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A... 


Zudia y Antonio, 
sin cuya ayuda 
habría terminado 
antes. 


Tal vez 
El autor 


Prólogo 


En los últimos años hemos asistido a un vertiginoso desarrollo de la in- 
formática y muy especialmente de la microinformática. 


Los ordenadores personales SINCLAIR han sido un claro ejemplo y sus 
ventas se cuentan por millones en todo el mundo. El éxito del Ordenador 
Personal Sinclair ZX Spectrum ha sido motivado no sólo por lo original 
de su concepción sino más bien por la enorme cantidad de literatura y 
software que sobre él se ha publicado. 


Los libros que el autor ha publicado hasta la aparición de éste han corri- 
do un camino paralelo al del Spectrum y en lo que al mercado de lengua 
española se refiere han sido el complemento al manual del usuario, cuando 
no el propio manual. 


La literatura sobre SPECTRUM es enorme, pero en castellano y pensada 
para el lector en castellano, era inexistente hasta la aparición de los libros 
del AUTOR. 


En la mayoría de los casos los manuales de usuarios han sido escritos 
por expertos que poco o nada han tenido en cuenta las características de 
sus futuros lectores. 


Los libros escritos por Antonio Bellido son todo lo contrario, esto es, 
han sido pensados por un usuario y para el usuario. La claridad en la pre- 
sentación, la sencillez en la exposición y los ejemplos que se acompañan 
vienen a complementar, cuando no a aclarar, los conceptos en los que el 
lector trata de profundizar. 


Este nuevo libro en relación al Ordenador Personal SINCLAIR SPEC- 
TRUM no dudamos acompañará en éxito a los anteriores del Autor y 
harán que el SPECTRUM PLUS llegue en efecto “PLUS ULTRA”. 


RICARDO GARCIA GETE 
Director Comercial de la 
División de Microelectrónica 
de INVESTRONICA 
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Introducción 


En la presente publicación resumo lo mejor —y más adecuado a los propósitos didácticos 
que persigo— de otros títulos mios y añado temas no tocados por mí hasta el momento. 


Sugiero al posible lector de este libro que revise el INDICE de materias, ya que la SEC- 
CION 1? y la 3% están extraídas de “Cómo programar su Spectrum” y de “Los colores y los 
gráficos en el Spectrum”. 


El contenido de los dos volúmenes en que se divide este trabajo es igualmente útil para 
los usuarios de cualquier tipo de Spectrum, no obstante existen pequeñas diferencias en el 
manejo del teclado entre el plus y el modelo convencional y, aunque en los respectivos ma- 
nuales está claramente explicado todo lo referente a este punto, en el APENDICE A se estu- 
dia con detalle ambas posibilidades. 


Aquellas personas que ya estén familiarizadas con la programación en BASIC, pueden 
pasar directamente a la SECCION 2*, donde encontrarán las fichas explicativas de todas las 
palabras que utiliza el lenguaje BASIC de Sinclair, excepción hecha de las destinadas a la 
confección de gráficos y el color que se estudian en la SECCION 3%, 


El tomo primero finaliza con tres apéndices dedicados a los diagramas de flujo, las fun- 
ciones lógicas aplicadas y el troceado de cadenas respectivamente. 


En el tomo segundo nos encontramos en primer lugar con la SECCION 44, donde haya- 
mos caminos que conducen a la protección (o desprotección) de programas, líneas y, en 
definitiva, se suministran ciertas tretas que, normalmente, no están al alcance de los usua- 
rios. De esta sección sale el libro “Los trucos del Spectrum” editado también por Paraninfo. 


A continuación, la SECCION 5? trata el código máquina de forma que el lector lo vea en 
su verdadera dimensión, proveyéndole de los conocimientos suficientes que le permitan deci- 
dir si quiere —o no— profundizar en este terreno. Esta sección es un resumen del libro “Cur- 
so de Iniciación al Código Máquina”, también editado por Paraninfo con ensamblador op- 
cional en casete, 


La SECCION 6* pone fin al Segundo tomo con una amplia introducción al uso del 
microdrive. 


Un detallado apéndice dedicado a los sistemas de numeración, un plano de la memoria 
minuciosamente explicado y un croquis de acceso rápido a los diferentes comandos del teclado 
completan la obra. 


Espero que le sea de utilidad. 


El autor 
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Sección | 


Cómo programar 
el SPECTRUM 


INTRODUCCION PARA PRINCIPIANTES 


En esta primera parte he asumido que el lector está 
dando su primer paso dentro del mundo de los ordena- 
dores y, específicamente, en una parcela tan particular 
como es la programación en BASIC. También supongo 
unos conocimientos nulos de la lengua inglesa. Si 
usted domina el inglés, todo le resultará más tácil; si 
además ya tiene conocimientos de programación, quizá 
deba dirigirse directamente a la SECCION 1|!. 


Si usted no está familiarizado con el teclado de su 
Spectrum le recomiendo que lea el APENDICE A.. 


EL BASIC COMO UN IDIOMA 


No es lo mismo “Cervantes escribió el Quijote” que “Quijote escribió el Cer- 
vantes””. Es claro que el idioma español tiene unas reglas, gracias a las cuales, 
todos los hispanoparlantes nos podemos comunicar. 


Si quisiéramos entendernos con los suecos, habría que saber sueco o, muy 
probablemente, inglés, dado que la mayor ía de los suecos entienden este idioma. 


Pues bien, algo similar nos sucede con los ordenadores. 


Los humanos, para entenderse con los ordenadores, han desarrollado una 
serie de lenguajes, denominados de alto nivel, tales como el FORTH, COBOL o 
BASIC. Todos tienen sus propias reglas sintácticas, las cuales son mucho más 
estrictas que las que exige un idioma hablado o escrito entre personas. 


Cada una de las palabras que integran estos lenguajes de alto nivel no pueden 
ser directamente entendidas por el microprocesador (to *“cerebro”*) del micro- 
ordenador —un microprocesador sólo puede ejecutar microinstrucciones de su 
muy particular idioma, cuyo nombre es **código máquina”'—, consiguientemen- 
te, una palabra de cualquier idioma de alto nivel está formada por varias micro- 
instrucciones concatenadas de forma tal que, finalmente, realicen lo que el 
programador espera. 


Todos estos idiomas han sido desarrollados por angloparlantes y, consiguien- 
temente, en inglés. Esta es nuestra dificultad adicional. 


A partir de ahora se hará especial hincapié en la forma en que nuestro cerebro 
debe estructurarse para dirigirse al computador, y en recoger el concepto que 
cada palabra inglesa del lenguaje BASIC tiene en español. 


Para conseguir estos dos últimos objetivos haremos del Spectrum nuestro in- 
terlocutor y profesor, 


COMO UTILIZAR EL SPECTRUM 2 


Su Spectrum viene acompañado por una INTRODUCCION a este ordenador, 
un MANUAL de programación, una cinta casete de DEMOSTRACION, un 
transformador, un cable de conexión al televisor y un cable de conexión a un 
casete. Con esto, un TV y un casete usted está en condiciones de seguir este 
curso. 


El esquema de conexiones (Fig. 1) y la forma de poner en marcha su Spectrum 
está perfectamente explicado en la INTRODUCCION citada en el párrafo anterior 
y, por tanto, no se comenta aquí. Solamente indicarle que el Spectrum emiti- 
rá un ligero zumbido al conectarlo que no debe preocuparle. 


Para las personas no habituadas a este tipo de máquinas sumarizamos, como 
apoyo a la cinta de demostración, la función que cumplen todos los artilugios 
que conforman su sistema de computación y que, básicamente, son los mismos 
en los ordenadores de mayor entidad: 


*Caja del Spectrum.— Contiene toda la electrónica para el manejo y almace- 
namiento de la información (16K o 48K) y posee la adecuada conexión interna 
al teclado y externa al casete (EAR) para permitir la entrada de datos al com- 
putador más dos conexiones externas (TV y MIC) para permitir la salida de in- 
formación hacia el televisor y el casete. La ranura de mayor dimensión que se 
contempla en la parte posterior de la caja está destinada a permitir el acopla- 
miento de diferentes periféricos, tales como la impresora y la caja de expansio- 
nes. 


*Teclado.— Este dispositivo es sólo de entrada, ya que, por medio del tecleado 
adecuado, se consigue introducir información al ordenador. 


*Transformador.— Adecua la energía eléctrica a las necesidades de trabajo 
de la máquina (9Vs. y 1.2As). 


*Televisor.— Este dispositivo es sólo de salida, ya que, a través de él, el orde- 
nador emite sus respuestas e información en general, permitiendo una interac- 
tividad total entre el usuario y su computador. 


*Casete.— El magnetofón es un medio de almacenamiento externo —ajeno 
a la electrónica interna del computador— que permite transferir los datos y pro- 
gramas desde el ordenador a una cinta magnética (SAVE) y en sentido contra- 
rio (LOAD). Los ordenadores más costosos, generalmente, van dotados de unos 
artificios electromecánicos conocidos por “flopis'” (o disquetes), cuya misión 
es equivalente a la del casete pero con sustanciosas ventajas sobre éste, en cuan- 
to a la rapidez en el manejo de la información contenida en ellos. El Spectrum 
también los puede manejar. 


Fig. 1 


Esquema de conexiones del Spectrum. 
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*Impresora.— Es un dispositivo exclusivamente de salida que permite al usua- 
rio proveerse de copias —impresas en papel— de listados de programas, datos o 
reproducciones del contenido de la pantalla. 


La electrónica del Spectrum está constituida esencialmente por un micropro- 
cesador modelo Z-80, que cumple la función de UNIDAD CENTRAL DE PRO- 
CESO (CPU). Este microprocesador es muy usual en muchos otros microcom- 
putadores. Además están los chips de memoria. Dentro de estos hay que distin- 
guir entre los que **'memorizan”” la información de forma permanente y salen 
grabados de fábrica, de acuerdo con las instrucciones del diseñador (memoria 
ROM), y aquellos otros cuya capacidad de memoria desaparece cuando se 
corta la corriente eléctrica (memoria RAM). 


La memoria ROM del Spectrum es de 16K y contiene el INTERPRETE 
cuya misión consiste en transformar las instrucciones BASIC —entendibles por 
los humanos— en microinstrucciones de código máquina —entendibles por el 
microprocesador Z-80—. 


PROGRAMAS 


Hasta ahora hemos oído hablar de ordenadores y programas. De los primeros 
conocemos su aspecto exterior y, más o menos, la función que cumplen cada 
uno de los elementos que lo componen —al menos en el Spectrum—, pero con 
respecto a los segundos —los programas— suele haber confusión o —en muchos 
casos— desconocimiento total. Quizá sería conveniente aclarar que cualquier 
computador por muy caro y poderoso que sea es absolutamente estúpido y que 
sólo gracias a los programas consigue una aparente inteligencia, la cual, además, 
sólo abarca lo que el programa le permita. 


En el caso del Spectrum, y gracias a la memoria ROM, nada más conectar la 
máquina a la corriente, ya está en condiciones de “interpretar” —de entender— 
las instrucciones BASIC que reciba, pero, mientras no se le carge en memoria 
—memoria RAM- el programa adecuado, será incapaz de hacer la O con un ca- 


nuto. 


Supongamos que queremos convertir el ordenador en una máquina capaz de 
sumar dos números cualesquiera, que el usuario le dé al computador a través 
del teclado. Si éste intentara que la máquina sumara, sin introducir previamente 
en su memoria el programa que le diga cómo debe proceder con los números 
que se le van a dar, nos encontraríamos —todo lo más— con un mensaje de 
error. 


Para conseguir que el ordenador sume hay que enseñarle, y esto sólo se consi- 
gue con un programa escrito por alguien que sepa. 


Antes de dar el siguiente paso, vamos a ver cómo funciona el cerebro huma- 
no en úna circunstancia similar. 


Si usted le dijera a un muchachito: *“Vamos a ver si sabes sumar””, de inme- 
diato nuestro interlocutor se preparará para recibir la información adecuada, 
p. ej. “Cuántas son dos y dos”. Dado que el cerebro encargado de realizar la 
suma esperaba dos números contestará, lógicamente, de inmediato “cuatro”. 


La forma de preparar el cerebro del ordenador para la suma de dos números 
es decirle algo así como: 


10 INPUT A 
20 INPUT B 
30LETC=A+B 
40PRINTC 


Gracias a estas líneas escritas en BASIC el ordenador sabe que debe esperar la 
entrada de dos números, sumarlos e imprimirlos. 


PROGRAMAS 


Usted todavía no está en condiciones de interpretar ni de escribir programas 
en BASIC y, justamente con la intención de enseñarle, está escrita esta SECCION, 


Una última consideración. Es evidente la complejidad y capacidad del cere- 
bro humano pero, no obstante, ante situaciones absurdas reacciona con perple- 
jidad. Un ordenador, dada su especialización, se limita a detectar un error. Si en 
el ejemplo anterior, el muchachito hubiera respondido a su pregunta de ““Cuán- 
tas son dos y dos?”, p. ej., 'COLON””, con toda seguridad usted habría pasado 
por unos instantes de confusión hasta llegar a un par de conclusiones posibles. 
El ordenador, sin embargo, no hubiera dudado en contestar simplemente con 
un mensaje de error, en el cual le viene a indicar que esperaba un número y ha 
recibido un caracter. 


Dicho esto les voy a presentar a un personaje muy especial. 


ra YO, EL SPECTRUM 


Hola. Soy tu Spectrum. 


A partir de ahora, y si sigues mis recomendaciones, aprenderás rápidamente a 
utilizarme. He aquí la primera: Cuando te pongas delante de mí debes estar rela- 
jado y no tener ninguna clase de miedo, ya que, salvo que me maltrates física- 
mente, es casi imposible que logres estropearme. Por lo demás puedes seguir 
este curso tan deprisa como quieras, con la condición de que no dudes en volver 
atrás cuando lo creas necesario. 


¿Empezamos? 


Yo sé que tú no sabes y, por esa razón, iré poco a poco, pero ahora tendrás 
que hacer un esfuerzo. 


Trata de interpretar el pequeño programa que sigue. 
1 LET A=127 
2PRINTA 
Textualmente este programa me viene a decir: 
PRIMERO (1) DEJA (LET) LA VARIABLE “A” IGUAL A (=) 127 
SEGUNDO (2) IMPRIME (PRINT) ELCONTENIDO DELAVARIABLE “A” 
De este programa debes sacar dos conclusiones. La primera es que debes 
tener una idea de lo que significan en español las palabras inglesas del lenguaje 
de programación BASIC. En segundo lugar notarás que mi cerebro es tan orde- 
nado que necesito que te dirijas a mí de acuerdo con unas normas (sintaxis), sin 


las cuales yo sería incapaz de entender lo que me quieres ordenar. 


Estudiemos algunas de estas normas analizando el contenido del programa 
anterior. 


A simple vista podemos ver que está compuesto por dos líneas, pues bien, 
cada una de ellas se denomina LINEA DE PROGRAMA. La línea 1 ordena 
LET A=127 y la 2 ordena PRINT A. Estas líneas de programa deben ir de 
menor a mayor justo en el orden en que tú desees que yo ejecute el programa. 
Considero muy útil para ti que numeres las líneas de programa de 10 en 10 con 
lo cual el programa anterior quedaría: 


10 LET A=127 
20 PRINTA 


YO, EL SPECTRUM ES 


De esta forma aún tienes la posibilidad de introducir nuevas líneas de pro- 
gramas, lo cual será de gran utilidad como ya notarás. 


Después del número de cada línea de programa existen unas palabras —LET 
y PRINT— que corresponden a instrucciones del lenguaje de programación 
BASIC. La instrucción LET asigna un valor a una variable —en nuestro caso le 
da el valor 127 a la variable A— y la instrucción PRINT me obliga a imprimir en 
pantalla el valor que previamente se le haya asignado a la variable A. 


Las variables pueden ser numéricas o de caracteres según permitan la asigna- 
ción de números —o fórmulas que finalmente den un número— o por el contra- 
rio, sólo acepten textos o cadenas de caracteres. La forma en que yo distingo 
una de otras es muy sencilla: 


Cualquier letra o grupos de letras y números que EMPIECEN POR UNA LE- 
TRA me hacen saber que la variable es de tipo numérico. P. ej.: 


10 LET SPECTRUM16K = 30000 


Por ser SPECTRUM16K una variable y además ser numérica, el valor que se 
le puede dar es cualquier númiero, en este caso le hemos dado el valor 30000. 
Igualmente podría haber sido 2 ó 1984. Por el contrario, UNA SOLA LETRA 
SEGUIDA DEL SIMBOLO $ me hace saber que la variable es de tipo alfanumé 
rico —o de caracteres—. P. ej.: 


10 LET A$=""SPECTRUM16K”' 


Por ser A$ una variable y además alfanumérica, el contenido de la misma es 
cualquier combinación de caracteres SIEMPRE QUE ESTEN ENTRE CO- 
MILLAS. 


Una vez en este punto vamos a introducir nuestro primer programa en mi 
electrónico cuerpo. Conéctame a la corriente eléctrica a través de mi transfor- 
mador... oyes mi zumbidito? Eso significa que estoy “vivo'”. Ahora ponme en 
comunicación con un televisor preferiblemente en color y sintoniza mi señal. 


Aprieta la tecla ENTER. 


Comencemos. En este momento está el cursor en modo K, es decir, espero la 
entrada de una instrucción BASIC, no obstante te admitiré un número —co- 
rrespondiente al número de línea— antes de que me des una instrucción, sin 
que por ello cambie el cursor. Comienza por teclear el primer número de línea 
—10— y después la tecla L sobre la cual está también la palabra LET, ahora 
aprieta la letra A. Como observarás la palabra LET te deja automáticamente 
un espacio entre ella y la letra A. Para acabar la línea sólo queda teclear el sím- 
bolo = y el número 127. En este momento tenemos la línea primera del progra- 
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KN YO, EL SPECTRUM 


ma en la pantalla del televisor, pero yo aún no lo he guardado en mi memoria 
RAM. Para que tal cosa suceda debes apretar, al final de todas y cada una de 
las líneas de programa, la tecla ENTER. Por tanto, aprieta ENTER. 


Fijate que la línea de programa ha pasado a la parte superior de lá pantalla, y 
un símbolo “>” aparece entre el número de línea de programa y la instrucción 
en BASIC. A ese símbolo que cumple la función de indicarte en qué instrucción 
estoy situado, se le conoce como PUNTERO. 


Repite el proceso anterior con la segunda y última línea del programa. El 
programa está ya en mi memoria y listo para ser utilizado, para ello sólo debes 
saber cuál es la orden correspondiente. 

En inglés, la palabra RUN conlleva significados tan dispares como “correr”, 
“poner en movimiento”” o “explotar”. Así, si tú me das la orden RUN —segui- 
da claro está de la ejecutiva ENTER-— yo entenderé que tu deseo es que CO- 
RRA el programa o, lo que es igual, que lo ponga en movimiento o en explo- 
tación. 


Dicho esto, si pruebas a teclear RUN y ENTER, verás aparecer 127 en la 
esquina superior izquierda de la pantalla. 


Más tarde te explicaré el significado de los caracteres que aparecen en la es- 
quina inferior izquierda. 


Así los interpreto yo: 
Símbolo Significado 
Me ordena dejar “algo” IGUAL a “algo” 
Me ordena SUMAR. 
Me ordena RESTAR. 
Me ordena MULTIPLICAR. 
Me ordena DIVIDIR. 


Me ordena ELEVAR un número a una potencia. 
Por ejemplo: 


ze 2 TS 
CUALQUIER NUMERO Representa ese número. 


DE NO SABER NADA... ¡ASABER ALGO! E 


Ahora fíjate en este ejemplo: 


Vamos a hacer un programa para sumar dos números cualquiera, los cuales tú 
me dirás a través de mi teclado. 


Ahora te diré cómo debes *'hablarme””. 


“Espera (INPUT) a que te dé el primer número (A), después, espera (INPUT) a 
que te dé el otro número (B). A continuación deja (LET) en tu memoria el 
resultado (C) de sumar los dos números anteriores (A + B). Finalmente, impri- 
me (PRINT) en la pantalla al valor (C) de la suma””. 


Esto escrito en mi teclado, y de acuerdo con lo estudiado en las páginas an- 
teriores, sería una cosa así: 


(No teclees nada en mi teclado hasta que yo te avise). 
INPUT A 
INPUT B 
LETC=A+B 
PRINTC 


Si tratas de introducir estas líneas en mi ordenado cerebro no conseguirás 
nada. 


Necesito que me digas claramente el orden en que tengo que actuar. 
Esto sería un programa: 


(No teclees nada todavía. No seas impaciente.) 


Programa Comentarios 

1 INPUT A Primera LINEA DE PROGRAMA. 
2 INPUT B Segunda LINEA DE PROGRAMA. 
3LETC=A+B Tercera LINEA DE PROGRAMA. 
4PRINTC Cuarta LINEA DE PROGRAMA 


ES DE NO SABER NADA... ¡ASABER ALGO! 


Estas líneas de programa deben ir de menor a mayor justo en el orden en que 
tú quieras que yo opere. Cualquier numeración que siga la norma anterior es 
buena, pero yo te recomiendo que vayas de 10 en 10. Así: 


Programa Comentarios 


10 INPUT A Numerando las LINEAS DE PROGRAMA de 10 
en 10, tienes la posibilidad de introducir nuevas 
20 INPUT B LINEAS con nuevas instrucciones para mí. 


30LETC=A+B 
40 PRINTC 

Tal vez te preguntes qué significan la A, la B o la C. Relee en la página 23 lo 
referente a variables numéricas. 

Dado que A y B pueden ser cualquier número que tú me des por el teclado y, 
puesto que su suma también puede ser cualquier número, yo necesito asimilar- 
las a unas VARIABLES NUMERICAS y esas VARIABLES NUMERICAS son 


las que tú me indiques. En este caso A, B y C. 


Ahora enchúfate a la corriente y al televisor. Si dudas, echa un vistazo al co- 
mienzo de esta SECCION. 


Introduce el programa en mi memoria a través de mi teclado. Sigue el proce- 
so que te indico y analiza los comentarios. 


EMPIEZA A TECLEAR: 


Proceso Comentarios 


Antes de apretar ninguna tecla aparece una K en 
la esquina inferior izquierda de la pantalla. El cur- 
sor está representado por esa K. 


1% escribe 10 Este número lo interpreto como el número de la 
LINEA DE PROGRAMACION por ser previo a 
ninguna SENTENCIA. ; 


2% aprieta INPUT INPUT está encima de la tecla | y es una SEN- 
TENCIA U ORDEN. 
Observa como la K se ha transformado en L. Esto 
implica que ya no espero ninguna otra sentencia. 


DE NO SABER NADA... ¡ASABER ALGO! as | 


Proceso 


32 aprieta A 


4% aprieta ENTER 


Comentarios 


Por estar el cursor representado por una L, yo in- 
terpretaré que tú quieres justamente la letra A y 
no ninguno de los otros símbolos que la acom- 
pañan en su tecla. 


Con esta orden yo sé que la línea de programa 10 
está completa y que debo guardarla en mi memo- 
ria. 


En este momento aparece la K nuevamente. 


5" escribe 20 

6% aprieta INPUT 
7 aprieta B 

8% aprieta ENTER 


9% escribe 30 
10% aprieta LET 
11% aprieta C 


12% aprieta = 


13% aprieta A 
14% aprieta + 
15% aprieta B 
16% aprieta ENTER 
17% escribe 40 
18% aprieta PRINT 


19% aprieta C 


20% aprieta ENTER 


La línea de programa 20 pasa a mi memoria. 
El cursor se transforma en K nuevamente y apare- 
ce en el margen inferior izquierdo. 


Todas las instrucciones en rojo exigen apretar a la 
vez SYMBOL SHIFT. 


La línea de programa 30 pasa a mi memoria. 


La línea de programa 40 pasa a mi memoria. 


as | DE NO SABER NADA... ¡ASABER ALGO! 


Ya sé lo que quieres que haga y cómo quieres que lo haga. 
Vamos a usarlo. Para ello sólo tienes que: 
12 — Apretar RUN 
22 —Apretar ENTER 
Inmediatamente verás aparecer en la esquina inferior izquierda de tu pantalla 
una L, lo cual te indica que espero el primer número. 
Escríbelo y aprieta ENTER. (El 15 por ejemplo.) 
Otra vez aparece la L a la espera del segundo número. . 


Escríbelo y aprieta ENTER. (El 5 por ejemplo.) 

En el margen superior izquierdo aparecerá el resultado (20 si has introducido 
los sumandos sugeridos) y en la esquina inferior izquierda tendrás un mensaje 
mío $ OK, 40 : 1, con lo cual te indico que todo salió bien. 

En el apéndice 1 puedes ver el código de errores. 


Supongamos ahora que ya no quieres sumar. Ahora quieres multiplicar cual- 
quier número por cualquier otro. 


Tienes dos opciones: o haces un programa nuevo o modificas éste. 


Pero antes haz los EJERCICIOS DE CALCULO. 


Hasta aquí tu primera lección sobre computación. 


EJERCICIOS DE CALCULO e 


Haz los siguientes programas que te permitan respectivamente: 
1. Sumar hasta diez números que tú des a través del teclado. 
2. Sumar los dos primeros números y restar el tercero. 


3. Sumar los dos primeros números y restar el tercero, multiplicando el resul- 
tado anterior por un cuarto número. 


4. Elevar cualquier número a cualquier potencia. 
5. Hallar la raíz cuadrada de un número. 


Intenta razonar como “entendería”” yo cada cuestión. ¿Una ayudita? 


Ayuda al ejercicio 5 


“Espera la entrada (INPUT) de un número que llamarás A. Después deja 
(LET) C igual a la raíz cuadrada (SOR) de C. Después imprime el valor de C””. 


Ayuda al ejercicio 3 

“Espera la entrada (INPUT) de un número que llamarás A. Después espera la 
entrada (INPUT) de otro número que llamarás B. Después espera la entrada 
(INPUT) de otro número que llamarás C. Después espera la entrada (INPUT) de 
otro número que llamarás D. 

Después deja (LET) E igual a la suma (+) de A y B. 

Después deja (LET) F igual a la resta (-) de E y C. 

Después deja (LET) G igual al producto (*) de F por D. 


Te aconsejo que antes de empezar a programar escribas el programa en térmi- 
nos parecidos a los ejemplos anteriores. 


Una solución a estos ejercicios la tienes en la página siguiente. 
Siempre que empieces a teclear un programa no olvides limpiar mi memoria. 


Para ello tienes dos caminos: o bien desconectas el jack de entrada de co- 
rriente, o bien aprietas NEW, ENTER. 


E SOLUCIONES 
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Ejercicio 1 


Programa 


1 REM “EJERCICIO 1” 


10 INPUT N1 


20 INPUT N2 

30 INPUT N3 

40 INPUT N4 

50 INPUT N5 

60 INPUT N6 

70 INPUT N7 

80 INPUT N8 

90 INPUT N9 

100 INPUT N10 
MOLETS=N1 + N2 + 


+ N3 + N4 + N5 + NG + 
+ N7 + N8 + N9 + N10 


120 PRINTS 


RECUERDA: 


Comentarios 


La instrucción REM no afecta al programa. Sólo 
sirve para recordarte aquello que tú quieras resaltar 


Estas instrucciones me ordenan esperar la entrada 
de 10 números 


También podrías haber usado las variables numé- 
ricas A, B, C, D, etc. en vez de N1, N2, N3, etc. 


Me ordena “dejar'” la variable numérica S igual a 
la suma de las variables N1, N2, etc. 


Me ordena *“'imprimir”' el valor de S 


1. No olvides apretar ENTER después de completar cada línea de progra- 


ma, p. ej. 


Escribe 10 
Aprieta INPUT 
Escribe N1 
Aprieta ENTER 


2. Para correr (RUN) el programa, es decir, para hacerlo funcionar, aprieta 
RUN, ENTER. 


Ejercicio 2 


Programa Comentarios 


1 REM “EJERCICIO 2” REM no afecta al programa, sólo sirve para “'re- 
cordarte”” textos. 


10 INPUT A Espero la entrada de la variable numérica A. 
20 INPUT B Espero la entrada de la variable numérica B. 
30 INPUT C Espero la entrada de la variable numérica C. 
40LETD=A+B Dejo D igual a A + B. 

50LETE=D-C Dejo E igual a D - C. 

60 PRINT E: Imprimo el valor de E. 


Ejercicio 3 


Agrega las siguientes líneas de programa al programa del ejercicio 2. 


35 INPUT F Espero la entrada de la variable numérica F. 


60LETG=E*F Al escribir esta línea de programa (y apretar 
ENTER por supuesto) borras la anterior y “deja” 
la variable G igual a E * F. 


70PRINTG Imprimo el valor de G. 
Si quieres puedes ir grabando (SAVE) estos programas en un casete y así 


tendrás una colección de ejercicios grabados y, en todo caso, practicas la graba- 
ción (SAVE) y carga (LOAD) de programas. 


ES SOLUCIONES 


Ejercicio 4 


Programa Comentarios 

1 REM “EJERCICIO 4” 

10 INPUT X X es la variable que representa la base. 

20 INPUT Y Y es la variable que representa el exponente. 


30 LETZ= X1 Y 4 (SYMBOL SHIFT y H) me ordena elevar X a la 
potencia Y. 


40 PRINT Z 


Ejercicio 5 


Programa Comentarios 


1 REM “EJERCICIO 5” 


10 INPUT A 


20 LETB=SORA SOR me ordena extraer la raíz cuadrada de A. 
SOR se obtiene así: 1.— SYMBOL SHIFT y CAPS 
SHIFT con lo cual cambia el cursor a E. 
2.— SQOR (sobre la tecla. H). 


30 PRINT B. 


SOLUCIONES KEN 


Ejercicio 3A 


Una solución alternativa. 


Programa Comentarios 


1 REM “EJERCICIO 3A” 
10 INPUT A 

20 INPUT B 

30 INPUT C 

40 INPUT D 
50LETE=(A+B-C)*D 
60PRINT E 


1-7 BORRANDO Y MODIFICANDO 


Tan importante como saber programar es saber borrar y modificar cuando 
sea necesario. 


En inglés DELETE significa “borrar” y EDIT significa “editar”. Consiguien-- 
temente, cuando queramos borrar usaremos la instrucción DELETE y cuando 
queramos editar una línea de programa completa para manipularla, bien para 
borrar parte de ella, bien para introducir algún cambio, utilizaremos la instruc- 
ción EDIT. Un ejemplo servirá de explicación. 


Un ejemplo servirá de explicación. 
Si en ei programa 

10 LET A = 127 

20 PRINTA 
quisieras cambiar la variable A por la F tendrías que empezar por desplazar el 
puntero hasta situarlo en la línea 10. En todo caso, el puntero se desplaza 
arriba y abajo por medio de las teclas 7 y 6, según indican las flechas que están 
dibujadas justamente encima de las mismas, apretando simultáneamente la 


CAPS SHIFT en el caso del Spectrum convencional o directamente con las fle- 
«chas de la última fila de teclas del Spectrum Plus, 


Una vez situado el puntero en la línea de programa que desees editar, apreta- 
rás la tecla EDIT —de acuerdo con tu tipo de Spectrum— para que yo ejecute 
la “edición”. 


Al hacerlo notarás que paso la línea sobre la que está el puntero a la parte 
inferior de la pantalla, con lo cual te indico que ya estás en condiciones de 
introducir las modificaciones que consideres necesarias. En el caso propuesto se 
trata de cambiar la A por la F. Ahora debes desplazar el cursor a la derecha de 
la A, para lo cual apretarás simultáneamente CAPS SHIFT y865(=>, <=), y 
una vez allí proceder al borrado de la letra A, para lo cual apretarás simultánea- 
mente CAPS SHIFT y DELETE o directamente DELETE si tienes un PLUS. 
Una vez borrada la A debes proceder a insertar la letra F, lo cual sólo requiere 
apretar la tecla F sin necesidad de mover el cursor. Ya está la línea 10 modifi- 
cada, efectúa tú las operaciones adecuadas para cambiar la letra A de la línea 
20 por la F. 


EJERCICIOS DE MODIFICACION E7S 


Ejercicio 6 . Si tienes el ejercicio 1 grabado en un casete, cárgalo (LOAD) en 
mi memoria, si no, teclea el programa de nuevo. 


Cuando lo tengas listado (LIST, ENTER) en la pantalla, conviértelo de forma 
que sirva para sumar sólo dos números. 


Ejercicio 7. Convierte este último en el programa del ejercicio 3. 


Ejercicio 8. Convierte este último en el programa del ejercicio 3A. 


ES SOLUCIONES 


Ejercicio 6 


Proceso Comentarios 
30 ENTER Cualquier número de línea de programa seguido 
de ENTER borra el contenido que pudiera tener 
40 ENTER esa línea de programa. 
50 ENTER 
60 ENTER 
70 ENTER 
80 ENTER 
90 ENTER 
100 ENTER 
Ahora desplaza el puntero hasta la línea 110 apretando CAPS SHIFT y 6 si- 


multáneamente o directamente la flecha | en el PLUS. 


Edita (EDIT) esta línea apretando CAPS SHIFT y 1 o directamente EDIT en 
el PLUS. 


La K está entre 110 y LET. Aprieta CAPS SHIFT y 8 ó > en el PLUS. 


La K cambió a L. Sigue desplazando el cursor hasta que la L esté situada a la 
derecha de N10. 


Empieza a borrar (DELETE) hasta que la L se sitúe a la derecha de N2. 
Aprieta ENTER. 


El programa está modificado. Ya puedes correrlo (RUN, ENTER). 


Sólo podrás sumar dos números. 


SOLUCIONES EN 


Ejercicio 7 


Proceso Comentarios 
30 INPUT C Introduce esta línea (no olvides ENTER) 


M5 LETE=5S-C Introduce esta línea de programa. 


Desplaza el puntero hasta la línea 120. 
Edita (EDIT) la lnea 120. 
Borra la S y sustitúyela por E. 
En este punto el programa funciona exactamente ¡igual que el del ejercicio 2, 
aunque las varizbles usadas sean distintas. 
39 INPUT F Introduce esta línea de programa. 
120LETG= E? F Sustituimos la línea 120 (que ya no será útil) por 
esta otra que cumple la función de multiplicar E 
por C. (La variable F del ejercicio 3 es aquí la C). 
130PRINT G Imprime el valor G. 
En este ejercicio debes concluir que no importa el número de línea de pro- 
gramación que utilices, con tal de que sea mayor que el número de la línea 


anterior y menor que el de la línea siguiente: ¡Lo único importante es que yo 
sepa el orden con que debo realizar las operaciones! 


Ejercicio 8 


Proceso Comentarios 


Te aconsejo que cambies todas las variables a las que figuran en el ejercicio 3a. 


MOLETE=A+B-C*D Sustituye la línea 110 por esta otra. 


ES SOLUCIONES 


115 ENTER Borra las instrucciones contenidas en las líneas de 
programación 1.15 y 120 dejándolas *'vacías””. 


120 ENTER 


130 PRINT E Es más rápido escribir esta línea (por su longitud) 
que editarla. 


Corre (RUN, ENTER) el programa y haz algunas pruebas. 


Para acabar estas prácticas sobre modificaciones y cambios te mostraré un 
buen truco: 


Si quieres “editar'” una determinada línea de programación, puedes evitarte 
la rutina de subir o bajar el ““puntero””, simplemente apretando LIST seguido 
del número de la línea de programa que te interese modificar (y ENTER claro). 
De esta forma el puntero te saldrá en la línea deseada y sólo tendrás que editar, 

Prueba LIST 110, 


¿Vale?... de nada, de nada. 


CLARIDAD EN 


Un programa claro es un programa fácil de entender. Es muy usual pensar 
que el programa que hacemos hoy está suficientemente claro para su escritor, 
de forma que nos da la impresión de que por los siglos de los siglos lo entende- 
remos. Nada más lejos de la realidad; con toda probabilidad, la próxima vez que 
lo usemos, si no hemos sido precavidos, tendremos que consumir un tiempo 
más que razonable para saber cómo utilizarlo o cómo lo hicimos. 


En inglés REMARK significa ““observación”” o “nota”, de aquí la instrucción 
REM del lenguaje BASIC, gracias a la cual puedes introducir aclaraciones en 
un programa sin que el contenido que sigue a las instrucciones afecte para nada 
a la ejecución del programa. 


Volviendo a nuestro programa 
10 LET A = 127 
20PRINTA 


y a pesar de su sencillez, sería conveniente introducir un REM de la siguiente 
forma: 5 REM, este programa es un ejercicio. Una vez tecleada esta línea, el 
programa quedará como sigue: 


5 REM este programa es un ejercicio 
10 LET A= 127 
20 PRINTA 


Después de hecha esta modificación, todo habrá quedado igual, excepto por 
el hecho de haber introducido la nota aclaratoria REM de la línea 5, la cual no 
ha afectado al programa para nada. 


En inglés LIST significa LISTA —relación ordenada— y LIST es una instruc- 
ción BASIC según la cual me ordenas que te muestre por pantalla el progra- 
ma que tengo en memoria. En el ejemplo anterior, y después de haber corrido 
el programa (RUN, ENTER), si quisieras volver a tener en pantalla el programa 
sólo tendrías que apretar LIST y ENTER. 


Las notas REM son fundamentalmente aclaraciones para el programador. 
Pero no debes olvidar al usuario del programa, que no tiene por que coincidir 
con su creador y, consiguientemente, necesita saber cómo usar el programa. 


Supongamos que vamos a desarrollar un programa que nos sirva para sumar 
dos números cualesquiera. La estructura fundamental del mismo sería: 


10 INPUT A 
20 INPUT B 
30 LETC=A+B 


La palabra INPUT significa ““entrada”” y, como instrucción BASIC, me viene 
a decir “espera la entrada de un dato” con lo cual, cuando yo encuentro una 
instrucción INPUT, me paro hasta que me introduces por teclado el dato que 
deseas, seguido de un ENTER para que yo sepa que has acabado de escribir. 


El programa anterior lo interpretaría yo, si tuviera tu cerebro, de la si- 
guiente forma: 


“Primero (10) espera la entrada de un dato (INPUT A), segundo (20), espera 
la entrada de otro dato (INPUT B) y tercero (30) deja (LET) la variable C igual 
a (=) el contenido de la variable A más (+) el contenido de la variable B.””. 


Si el programa lo dejaras tal cual está, con toda probabilidad no habría quien 
supiera usarlo, puesto que en la pantalla no aparece ningún mensaje aclaratorio 
y, además, el resultado de la suma tampoco aparece en la pantalla. En otras 


palabras, este programa no es útil. Introduciremos algunas líneas aclaratorias: 


5 REM programa para sumar dos números cuales- 
quiera introducidos por teclado 


7 PRINT “Teclea el primer sumando” 
10 INPUT A 

15 PRINT “Teclea el segundo sumando”” 
20 INPUT B 

30 LETC=A+B 

40 PRINT “El resultado de la suma es”” 
50 PRINT C 


Teclea este programa en mi teclado y haz algunas pruebas con diferentes pa- 
res de números. 


40 


CARACTERES | uo 


Hasta el momento, prácticamente todos los ejemplos los has hecho utilizan- 
do números y variables numéricas, y tal vez pienses que mi habilidad acaba ahí; 
a lo largo de este capítulo te voy a demostrar lo contrario. 


Más arriba te mostré que yo sé que una variable va a ser alfanumérica, siem- 


pre que la representes por UNA SOLA LETRA SEGUIDA DEL SIMBOLO $. 


También te dije que el contenido de una variable alfanumérica debe represen- 
tarse entre comillas. P. ej.: 


10 LET S$= “En un lugar de La Mancha” 


Las variables alfanuméricas, a diferencia de las numéricas, sólo se pueden 
sumar. P. ej.: 


10 LET S$ = “En un lugar de La Mancha”” 


20 LET B$ = “de cuyo nombre no quiero acor- 
darme...” 


30 LET V$ = S$ + B$ 
40 PRINT V$ 


¡Ojo! No puedes sumar una variable numérica con una alfanumérica, por la 
misma razón que no podrías sumar JUANITO + 4. 


1-11 EJERCICIOS CON CARACTERES 


Ejercicio 9. Lista el programa del ejercicio 3 A. 


¿Cómo harías para que la pantalla te pregunte? 

NUMERO 1 ? (antes de darme el primer número) 

NUMERO 2 ? (antes de darme el segundo número) 

NUMERO 3 ? (antes de darme el tercer número) 

NUMERO 4 ? (antes de darme el cuarto número) 

Ejercicio 10. Sobre el resultado del ejercicio 9 ¿Cómo harías para que des- 


pués de darme cada número yo lo imprima a continuación del NUMERO co- 
rrespondiente? 


Ejercicio 11. Sobre el resultado del ejercicio 9. ¿Cómo harías para que te 
imprima “EL RESULTADO”! y a continuación el valor de E? 


¡No mires las soluciones! 


Primero inténtalo tú. Estos humanos... 


SOLUCIONES im 


Ejercicio 9 


Proceso Comentarios 
5 PRINT “NUMERO 1?” Inserta esta línea 
15PRINT “NUMERO 2?” Inserta esta línea 
25 PRINT “NUMERO 3?” Inserta esta línea 


32 PRINT “NUMERO 4?” Inserta esta línea 


Deja espacio (teclea SPACE) entre la palabra NUMERO y el número que la 
sigue y entre ? y las ”. 


Córrelo (RUN, ENTER). Mi respuesta te la doy justo debajo de NUMERO 4? 


Ejercicio 10 


Proceso Comentarios 
Lista el programa (LIST, ENTER). 
Inserta un punto y coma (;) al final de las líneas de programa 5; 15; 25 y 32. 
12 PRINTA Inserta esta línea 
22 PRINT B Inserta esta línea 
37 PRINTD Inserta esta línea 


Corre (RUN, ENTER) el programa modificado con algunos números y com- 
puébalo. 


Prueba a quitar los ; de las líneas 25 y 32. ¿Dónde pongo los números con 
respecto a los dos primeros? 


. ¡Ah! Los puntos y comas me atraen... 
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Ejercicio 11 


Proceso Comentarios 
Lista el programa (LIST, ENTER) Si aún está en mi memoria el pro- 
grama anterior. 
120 PRINT “EL RESULTADO”” Inserta esta línea 


Corre (RUN, ENTER) el programa con cuatro números cualquiera y prueba 
esta otra posibilidad: 


120 PRINT “EL RESULTADO ="'; E 
130 ENTER Borro la línea 130 


Corre (RUN, ENTER) esta variación con los mismos (u otros) cuatro nú- 
meros. 


¡El resultado es igual! 
La sentencia PRINT te acepta la posibilidad de concat-nar textos y variables 
numéricas por medio de comas (,) y puntos y comas (;). Así puedes eliminar 


líneas de programa innecesarias. 


Prueba a sustituir el punto y coma de la línea 120 por una coma y corre el 
programa de nuevo. 


Verás que el resultado se ha separado un poco. Tiene una explicación: “La 
coma me obliga a empezar a imprimir a partir de la columna 16”. 


EJERCICIOS CON VARIABLES DE CARACTERES ES 


Ejercicio 13 


Escribe un programa que te pregunte tu nombre y que, al dárselo, imprima: 


HOLA tu nombre 
RECUERDA: 
PROGRAMAR SERA TAN NECESARIO COMO LEER 


Ejercicio 12 
Haz un programa que te pregunte primero tu nombre, después tu apellido, tu 
teléfono y por último tu dirección, y que cada respuesta quede registrada en 
una variable de caracteres. 
NOMBRE? 
APELLIDO? 
TELEFONO? 


DIRECCION? 


Ejercicio 14 


Haz un programa que te pregunte tu profesión y tu edad, y que cada respues- 
ta quede registrada en una variable de caracteres. 


Ejercicio 15 


Ir directamente a su solución. 


ES SOLUCIONES 


Ejercicio 12 


Proceso Comentarios 


1 REM “EJERCICIO 12” 

10PRINT “TU NOMBRE”” 

20 INPUT N$ 

30 PRINT “HOLA””; N$ 

40 PRINT “RECUERDA:” 

50 PRINT “PROGRAMAR SERA TAN NECESARIO COMO LEER”. 


Ejercicio 13 

Programa Comentarios 

1 REM “EJERCICIO 13” 

10PRINT “NOMBRE?” 

20 INPUT N$ 

30 PRINT “APELLIDO?” 

40 INPUT AS 

50 PRINT “TELEFONO?” 

60 INPUT T$ Aunque la entrada sea un número yo lo voy a 
considerar como una cadena de caracteres, ya que 
lo asocio. a una variable de caracteres denomina- 
da T$ 

70PRINT “DIRECCION ? ”* 

80 INPUT D$ 


Sigue los pasos que te indico a continuación y aprenderás algo realmente in- 
teresante. 


Proceso Comentarios 

17 RUN, ENTER Con esta instrucción me ordenas que corra el pro- 
grama, es decir (como ya sabes) que lo haga fun- 
cionar. PERO ADEMAS PONGO A CERO (DEJO 
VACIAS) TODAS LAS VARIABLES NUMERI- 
CAS Y DE CARACTERES. 

2 Contesta a las preguntas: nombre, apellido, etc... 


37 PRINT AS, ENTER Con esta instrucción me ordenas que imprima el 
valor de A$ 


Te daré tu nombre en la esquina superior izquierda. 


Prueba con las otras variables. (PRINT TS, p. ej.) 


AHORA NO BORRES ESTE PROGRAMA. No aprietes RUN. INTRODUCE 
A CONTINUACION EL PROGRAMA DEL 


Ejercicio 14 

Proceso Comentarios 
1 REM “EJERCICIO 14” 

10PRINT “PROFESION?” 


20 INPUT Z$ Observa que utilizo una variable de caracteres 
(Z$) distinta a las usadas en el ejercicio 12. 


30 PRINT “EDAD?”' 
40 INPUT Y$ Vale el comentario de la línea 20 


50 PRINT “NOMBRE:”;¡N$ Yo mantengo en mi memoria el valor de N$ al 
margen de que haya en mi memoria un programa 
nuevo... siempre que no me hayas desconectado 
o apretado RUN o NEW, o uses las mismas varia- 
bles en el programa nuevo. 


60 PRINT “APELLIDOS:”;A$ Yo mantengo el valor de las variables, mien- 
tras tú no las cambies. 


3 SOLUCIONES 


70PRINT “TELEFONO:”; TS 
80 PRINT “DIRECCION:”; D$ 
90 PRINT “PROFESION:””; Z$ 
100 PRINT “EDAD:”; Y$ 
ATENCION: No corras el programa con RUN. 


A partir de ahora usa GOTO (seguido del primer número de línea de progra- 
ma), y ENTER como siempre. 


RECUERDA: Cuando usas RUN, ENTER yo correré el programa, pero 
ADEMAS TE BORRO EL CONTENIDO DE LAS VARIABLES. 


Por tanto, aprieta en este caso, GOTO 1 (o cualquier número anterior a 10, 
ya que 10 es la primera línea de programa útil), a continuación ENTER. 


Contesta a las preguntas del programa. 

Cuando lo hayas hecho, e inmediatamente, imprimiré toda la información 
que contienen las variables de caracteres que has utilizado y que tengo en me- 
moria. 

Me puedes listar como siempre (LIST, ENTER). 

Tendrás oportunidad de apreciar las ventajas de todo esto. 


De momento te aconsejo que guardes (SAVE) este programa en un casete, 
con los valores que tengan las variables. Lo llamaremos “EJERCICIO 14”. 


La utilizaremos en el ejercicio 15. 


Ejercicio 15 
Supongo que has guardado el programa anterior. 


Habrás notado lo práctico que es el cuenta vueltas de tu magnetofón para sa- 
ber dónde empieza cada programa... 


Bien, carga (LOAD) el ejercicio 14. 


¿Ya lo has hecho? 


RECUERDA: Si aprietas RUN, ENTER te quedas con el programa en mi me- 
moria pero **borro”” el contenido de las variables. 


Vamos a hacer pruebas: 


Prueba Resultado 


1 Aprieta GOTO 50 Impresión en pantalla de tus datos. 


2 Aprieta GOTO 1 Te pregunto tu profesión. Si me das otra distinta, 
sustituiré el valor de la variable Z$. 


Igual sucederá con Y$. 
Varía estos datos. 
Observa el resultado. 


No grabes en el casete esta modificación. 


LA PANTALLA 


Imagínate que la pantalla de tu televisor es una pizarra, en la cual yo voy a 
escribir las respuestas a las preguntas que tú me hagas. Bien, pues como yo no 
tengo ojos como tú, necesito tener puntos de referencia a los cuales dirigirme 
para poder imprimir donde tú me indiques; con este fin, yo considero la panta- 
lla dividida en 24 líneas y 32 columnas, numeradas a partir del O y de la esquina 
superior izquierda. 


Como ya sabes, PRINT significa IMPRIMIR y, como fácilmente se puede 
deducir, PRINT AT significa IMPRIME EN. En base a esto, si yo encuentro a lo 
largo de un programa la instrucción: 
PRINT AT 5, 7; “A” 


Sé que debo imprimir en la LINEA 5 y COLUMNA 7 la letra A. 


50 


LA PANTALLA ES 


Debes recordar que las dos últimas líneas —la 22 y la 23— me las reservo yo 
para comunicarme contigo y no están disponibles para ti. 


CLS es una contracción de CLEAR SCREEN que significa DESPEJAR LA 
PANTALLA. Si tú me das la instrucción CLEAR yo te dejaré la pantalla en 
blanco, pero no temas por el programa y los datos que tenga en memoria, 
yo no los olvidaré. 


PRINT TAB es fácil de entender si estás familiarizado con el uso del tabula- 
dor pero, en todo caso, quiere decirme que imprima en la misma línea en que 
estoy trabajando, pero en la columna que me indica el número que sigue al 
TAB. Veamos un ejemplo: 


Teclea directamente, para que veas el efecto del TAB de forma inmediata, la 
siguiente instrucción: PRINT TAB 5; “A””. Podrás apreciar que he impreso la 
letra A en la columna 5 de la línea que esté disponible y le corresponda. Haz 
algunas pruebas seguidas con PRINT TAB y comprenderás el significado de este 
último párrafo. 


PAUSE, evidentemente, significa PAUSA. PAUSE es una instrucción que me 
ordena mantener en pantalla todo lo que en ella está impreso, durante el tiem- 


po que tú me digas, después seguiré ejecutando el programa. PAUSE 50 equiva- 
le a una pausa de un segundo y PAUSE 500 a 10 segundos. Prueba el efecto de 
este programá: 


10 PRINT “En este mundo traidor”' 

20 PAUSE 100 

30 CLS 

40 PRINT “NADA ES VERDAD NI MENTIRA” 
50 PAUSE 100 

60 CLS 

70 PRINT “sólo el computador”” 

80 PAUSE 50 

90 CLS 
100 PRINT “TRABAJA Y TU NO LE OBLIGAS”” 


ES LA PANTALLA 


Bueno, después de este ““spectral'” verso es muy práctico saber cómo usar las 
comas (,) y los puntos y coma(;). Compara como se produce la impresión en los 
dos programas que siguen y que aparentemente son iguales. 

10PRINT “RO” 10PRINT “RO”; 

20 PRINT “MARBELLA” 20PRINT “MARBELLA”; 

30 PRINT “VE” 30 PRINT “VE”; 

Cuando corras ambos programas (RUN y ENTER) verás que el primero te 
imprime en la pantalla: 

RO 
MARBELLA 
VE 
y el segundo: 
ROMARBELLAVE 

Luego, puedes deducir que los puntos y comas me atraen hasta tal punto 

que, siempre que una orden de impresión acabe en ; yo me veré obligado a im- 


primir la siguiente orden justo a continuación de aquélla. 


Si, por el contrario, detrás de una orden de impresión me encontrara una 
coma (,) afectaría a las siguientes de esta forma”” 


10PRINT “NOMBRE”, 
30 PRINT “APELLIDOS”, 
30 PRINT “*” 


Una misma instrucción PRINT puede servir para imprimir diferentes textos. 
El ejemplo anterior se podría escribir también de esta manera, sin que la impre- 
sión variara: 


10 PRINT “NOMBRE”, “APELLIDOS”, “**” 


LA PANTALLA ras | 


Si utilizáramos este criterio en el ejemplo donde se empleaban los puntos y 
comas, también sería válido. Comprueba que no hay variaciones: 


10PRINT “RO”; “MARBELLA”; “VE” 


Habrás observado que después de terminar la ejecución de cada programa, te 
envío un mensaje del tipo: 


0 OK, 90:1 


Los caracteres anteriores a la coma (,) te indican el tipo de error, si lo hay 
—$ OK significa que he corrido el programa y no ha habido ningún error—. 
Los caracteres posteriores a la coma definen la línea en la cual me encuentro y, 
finalmente, la sentencia dentro de esa línea. 


16 EJERCICIOS DE PANTALLA 


Ejercicio 16 


Haz un programa que te imprima automáticamente un * en la esquina supe- 
rior izquierda de la pantalla, otro en el centro y otro en la esquina inferior de- 


recha. (Usando PRINT AT). 
(No olvides que las dos últimas líneas de la pantalla no están disponibles 


para tí.) 
Repite el programa poniendo a continuación del * las vocales AEIOU. 


Ejercicio 17 


Sabrías hacer el programa anterior usando PRINT y PRINT TAB. 


Ejercicio 18 


Carga (LOAD) el “EJERCICIO 13” en mi memoria. 


Cambia el programa (SIN ALTERAR EL CONTENIDO DE LAS VARIA- 
BLES) de forma que imprima los textos a la izquierda de la pantalla y el con- 
tenido de las variables de caracteres a partir de la columna 20 y en la misma 


línea (Usa PRINT TAB). 


Ejercicio 19 


Cambia la impresión de las variables del programa anterior para que imprima 
a partir de la columna 16 (Usa la coma (,)). 


SOLUCIONES ES 


Ejercicio 16 
Programa Comentarios 
1 REM “EJERCICIO 16” 


TO.PRINT >” También vale PRINT TAB 0; **” o PRINT AT 
0,0; *****, Con una columna de variación. 


20 PRINT AT 10, 16;**'”” Tambien podrías haber escrito: 20 PRINT, **” 
3SOPRINTAT21,32;**"” 


Ejercicio 17 

Programa Comentarios 
1 REM “EJERCICIO 17” 

TOPRINTA-"S 


20PRINT Una instrucción PRINT sin nada a continuación 
me obliga a dejar una línea en blanco 


30 PRINT 
40 PRINT 
50 PRINT 
60 PRINT 


70PRINT Este procedimiento de espaciar las líneas de im- 
presión en pantalla es incómodo y consume una 
gran capacidad de memoria. 


80 PRINT 
90 PRINT 
100 PRINT 
110PRINT TAB 16; ***” 


ra SOLUCIONES 


120 PRINT 
130 PRINT 
140 PRINT 


150 PRINT Acostúmbrate a usar PRINT TAB, PRINT AT y 
siempre que puedas punto y coma (;) y coma (,). 


160 PRINT 
170 PRINT 
180 PRINT 
190 PRINT 
200 PRINT 
210PRINT 
220 PRINT 
230 PRINTITAB:31""., 


Ejercicio 18 

Programa Comentarios 
50PRINT “NOMBRE”; Cambia la línea 50 por ésta. 

TAB 20; N$ Fíjate como se ha colocado aquí TAB. 
60 PRINT “APELLIDOS:”; 

TAB 20; A$ 

70 

80 


90 Cambia tú estas líneas 


SOLUCIONES a 


Cuando hayas acabado las modificaciones y quieras comprobar el resultado, 
deberás apretar GOTO 50; de esta forma, yo te correré el programa desde la 
línea 50 sin borrar las variables y sin hacerte las preguntas que van en las líneas 
de programa anteriores. 


¿Has seguido estas instrucciones? 


Bueno, pues ahora aprieta GOTO 1 y... ¿A ver cómo te las ingenias para que 
te dé la impresión por pantalla... sin alterar el contenido de las variables? 


Normalmente, mi proceso de trabajo consiste en ejecutar las instrucciones 
una detrás de otra, justamente como ya sabes, pero hay ocasiones en que te 
interesa que se altere este sistema, saltando incondicionalmente a una línea de 
programa distinta a la siguiente. Para que yo sepa que debo hacer ésto, debes 
decirme “VETE A la línea de programa número tal”. Existe una instrucción 
BASIC que cumple esta función: GOTO, que significa exactamente VETE A. 


Veamos cómo funciona el siguiente programa: 

10 REM salto incondicionado 

20 PRINT “PRIMER SUMANDO?”* 

25 INPUT A 

30 PRINT “SEGUNDO SUMANDO?”" 

50 INPUT B 

60 LETC=A+B 

70 PRINT “LA SUMA ES”; C 

80 GOTO 20 

Como verás, la línea 80 es la única nueva y es de clara interpretación en tan- 
to en cuanto me obliga a ir a la línea 20, donde volveré a iniciar el ciclo y, 
mientras tú no hagas algo, yo seguiré ininterrumpidamente llegando a la línea 
80 y volviendo a la 20. Esto es un BUCLE. 

Cuando yo esté metido en un bucle tendrás dificultades para conseguir que 
yo obedezca una instrucción LIST. Primero te daría un error de interpretación, 
si la variable que espero es numérica, con lo cual saldría del bucle y ya estaría 
en condiciones de aceptar cualquier orden. Si por el contrario estoy a la espera 


de una variable alfanumérica, tendrías que utilizar la instrucción BREAK 
(SPACE y ENTER) antes de pulsar LIST. 


Este epígrafe necesita pocas explicaciones y lo mejor es hacer los EJERCI- 
CIOS CON SALTOS INCONDICIONALES. 


EJERCICIOS CON GOTO (SALTOS INCONDICIONALES) ES 


Ejercicio 19 


Haz un programa que imprima las vocales (A, E, |, O, U) una debajo de otra 
en la pantalla, y, hasta que ésta se llene. 


Usa instrucciones PRINT y GOTO. 


Ejercicio 20 


¿Se puede cambiar el valor numérico de la instrucción GOTO por una varia- 
ble numérica? 


Ejercicio 21 


Haz el ejercicio 19 usando PRINT AT, GOTO y, , 


Ejercicio de interpretación 
¿Cómo funcionaría este programa? 
10LETA=1 
20 PRINTA 
30 GOTO 10000 
1000 GOTO 1000 


Ejercicio 19 


Programa Comentarios 


10 PRINT “A” 
20 PRINT E” 
30 PRINT “1” 
40 PRINT “O” 
50 PRINT “U”” 
60 GOTO 10 


SOLUCIONES ES 


Ejercicio 20 


Sí se puede. Cambia la línea 60 del programa anterior por: 60 GOTO X y 
ahora introduce LET X = 10 (sin número de línea), y aprieta ENTER. 


El programa correrá igual que antes, ya que a X le hemos dado el valor 
10. Prueba haciendo: 


LET X = 20 
LET X= 30 
LET X = 40 
LET X = 50 


Ejercicio 21 
Programa Comentarios 


5LETC=0 5. Se define el valor de la variable C. 


10PRINT AT o O; 10. La doble coma obliga a un salto de línea, im- 
primiendo por tanto para cada valor de C: 


gt “ur A 
”, TN 

dl Ane my 
et >, E 


| 
O 
U 


ZOLETO=CG+SD 20. Deja a C igual al valor anterior que tuviera más 
cinco y, así obtenemos: 


E SOLUCIONES 


Programa Comentarios 
A 2 
Mei aan ses 5 
Mi E 6 
E 7 
ta ea aude 8 
AS 9 
A A A 10 

30 GOTO 10 


62 


DECISIONES 1-17 


Yo puedo tomar decisiones siempre y cuando me des las instrucciones opor- 
tunas con arreglo a la sintaxis que exige el BASIC. 


Entre humanos os podéis decir cosas como éstas: “SI te llamas Pepe ENTON- 
CES vete a Caracas””. Obviamente, yo no entendería una orden así... pero sí una 
muy aproximada. Supongamos que me quieres enviar a la línea 540 si la varia- 
ble A es igual a 10 en el transcurso del siguiente programa: 

10 REM tomando decisiones 

20 PRINT “Primer factor?”* 

30 INPUT X 

40 PRINT “Segundo factor?”' 

50 INPUT Y 

G0LETA=X* Y 

701F A= 10 THEN GOTO 540 

80 PRINT “EL PRODUCTO ES”'; A 

90 GOTO 20 


540 PRINT “ESTOY EN LA LINEA 540 PORQUE LA VARIABLE A 
VALE ”; A: GOTO 90 


Un par de cosas llaman la atención en este programa. La primera es la línea 
70, según la cual me indicas que en el caso —y sólo en el caso— de que la va- 
riable A sea igual a 10 me dirija a la línea 540: “SI A= 10 ENTONCES VETE 
A 540”, esto sería un salto condicionado, ya que implica un cambio en el nor- 
mal proceso de lectura de instrucciones si se cumple una condición previa. El 
segundo detalle interesante está en los dos puntos (:) que aparecen antes del 
GOTO de la línea 540. 


Yo, el Spectrum, permito que en una sola línea de programa entre más de 
una instrucción, para lo cual debes respetar esta regla: “Después de cada ins- 
trucción completa se ha de colocar el símbolo **:””, de esta forma, yo sabré 
dónde acaba una y empieza otra instrucción. Siguiendo esta indicación puedes 
confeccionar un programa de esta manera: 


1-17 DECISIONES 


10 REM Líneas multisentencia 

20 PRINT “Escriba su nombre por favor”: INPUT N$: PRINT 
“GRACIAS”; N$ 

Volviendo a nuestra sentencia |F ... THEN es conveniente saber que cual- 


quier operador aritmético es susceptible de ser usado. Sobre las teclas O, W, E, 
R, T y L te ofrezco mis posibilidades. Veamos un ejemplo: 

10 REM EJERCICIO CON < = 

20 PRINT “DAME UN NUMERO” 

30 INPUT A 

40 |FA<= 10 THEN PRINT A: GOTO 20 

50 PRINT A/2 

Esto me viene a decir que si el número que me das es menor o igual a 10 lo 
debo imprimir, en cualquier otro caso también lo imprimiría, pero dividido 
por 2. 

Antes de pasar a los ejercicios debo volver a recordarte mi habilidad para 
trabajar con caracteres y variables alfanuméricas. Estoy perfectamente capa- 
citado incluso para compararlas, debido a que, para mí, las letras tienen un 
“peso” y consiguientemente puedo saber si una está antes que otra. 

Estudia este ejemplo: 

10 REM Comparando letras 

20 PRINT “Dime una letra” 

30 INPUT AS 

40 PRINT “Dime otra letra”” 

50 INPUT B$ 

60 IF AS < B$ THEN GOTO 90 


70 PRINT B$; “ES MAYOR QUE ”; A$ 
80 GOTO 20 


90 PRINT A$; “ES MENOR QUE””; B$ 


Compara las letras del abecedario entre sí, luego palabras con palabras y, 
finalmente, números. 


EJERCICIOS DE DECISION (IF/THEM) EN 


Ejercicio 22 
Desarrolla un programa que te diga: 


PASE o ESPERE, según el color azul o rojo de un semáforo. El color lo in- 
troduces tú por el teclado. 


Ejercicio 23 


Para ser candidata a Miss Universo se debe medir más de 1,70 metros y pesar 
menos de 60 Kilos. 


¿Podrías hacer un programa en el que dando el nombre, estatura y peso de 
cada aspirante te diga si reúne o no los requisitos mínimos? 


Ejercicio 24 


¿Qué tendrías que hacer,para que la Srta. Juanita del Enchufe y Alto Voltaje 
fuera admitida, sea cual fuere su talla y peso, en el concurso de belleza del pro- 
grama anterior? 


Ejercicio 25 
¿Qué instrucciones pondrías al principio de un programa para que sólo fun- 


cionara con las personas que conozcan la “clave secreta””? En el ejercicio ante- 
rior, por ejemplo. 


Ejercicio 26 


Escribe un programa que ponga en orden alfabético cuatro palabras cual- 
quiera. 


3 SOLUCIONES 


Ejercicio 22 

Programa Comentarios 
10 REM SEMAFORO 

20 PRINT “color del semáforo? (azul/rojo)”. 

30 INPUT A$ 

40 IF AS$<> “AZUL” THEN GOTO 70 


50 PRINT PAPER 1; INK 1; AT 11, 13; “PASE” 
60 GOTO 80 
70 PRINT PAPER 2; INK 1; AT 11, 13; “ESPERE” 


80 PRINT AT 20,0; “OTRO ENSAYO? (s/n)” 
90 INPUT R$ 

100 IF R$= “SI” THEN CLS : GOTO 20 

110 CLS : PRINT AT 0,0; “ADIOS” 


120 STOP 
Ejercicio 23 
Programa Comentarios 
5 PRINT “NOMBRE?” Observa como la operación lógica OR implica que 

la instrucción THEM se cumple cuando alguna de 
las condiciones IF es cierta. 

10 INPUT N$ 

11 PRINT NS 

15PRINT “TALLA?”, 


20 INPUT T 
21 PRINTT 


25 PRINT “PESO ?”, 


SOLUCIONES | 


30 INPUT P 

31 PRINTP 

35 IF T< 1,7 ORP> 60 THEN GOTO 70 
40 PRINT NS, “ADMITIDA” 

45 PRINT AT 21,0; “OTRA CANDIDATA ? ” 
50 INPUT 0$ 

55 1F O$= “NO” THEN STOP 

60 CLS 

65 GOTO 5 

70 PRINTN$, “RECHAZADA” 

75 GOTO 45 


Ejercicio 24 


Modifica la línea 35: 


35 IF T< 1,70RP> 60, THEM IF N$ <> “JUANITA DEL ENCHUFE” 
THEN GOTO 70 


Ejercicio 25 

1 PRINT “CLAVE?” 

2 INPUT C$ 

3 1FC$<> “CUALQUIER COMBINACION DE CARACTERES” THEN STOP 
5 PRINT “NOMBRE ?” 

10 INPUT N$ 

11 PRINT NS 


EN REPETICION 


La instrucción FOR-TO/NEXT es aparentemente complicada pero de suma 
utilidad para determinadas aplicaciones, y tal vez mejor que ninguna explica- 
ción previa sea estudiar un ejemplo sencillo y comentarlo posteriormente. 


10 REM ejemplo FOR-TO/NEXT 


20 REM TABLA DE MULTIPLICAR POR DOS 
30 FORY=0T010 

40LETA=2* Y 

50 PRINTA 

60 NEXT Y 

70 STOP 


Haciendo caso omiso de las REM de las líneas 10 y 20, este programa tiene el 
siguiente significado para mí: “PARA el valor O de la variable Y, y HASTA que 
esta variable alcance el valor 10, DEJA la variable A igual a 2 por el valor actual 
de la variable Y; a continuación IMPRIME el valor de A y, finalmente, da a la 
variable Y el PROXIMO valor y vuelve a la instrucción FOR de la línea 30, 
donde se repetiría el ciclo anteriormente expuesto pero con Y = 1. Y así suce- 
sivamente hasta que la variable Y alcanzara el valor 10, con cuyo valor se consu- 
miría el último ciclo y pasaría a la instrucción 70.”* 


En la práctica mi proceso de trabajo consistiría en darle a la variable Y el 
valor 0, multiplicarlo por 2, imprimir el resultado, al llegar a la instrucción 
NEXT hacer Y = 1 y volver a la línea 30 donde empezaría otra vez multiplican- 
do por dos este nuevo valor de Y, imprimiéndolo y, al llegar a NEXT daría el 
siguiente valor a Y (Y = 2) comenzando otra vez todo el proceso. Y así una y 
otra vez hasta que el siguiente valor fuera 11, con lo cual la variable Y tomaría 
un valor superior al impuesto por la instrucción TO, que en nuestro caso es 10, 
con lo cual yo seguiría a la instrucción 70. 


En ocasiones interesa que la cadencia con que la variable va tomando valores 
sea distinta a la unidad; para ello tienes disponible la instrucción STEP. Si en el 
programa anterior cambiásemos la línea número 30 por la siguiente: 


30 FOR Y =0TO 10 STEP 2 
el proceso de trabajo sería exactamente igual excepto por el hecho de que al lle- 


gar a la instrucción NEXT los valores que iría tomando la variable Y variarían 
de dos en dos, ya que así lo impone el STEP 2 que hemos introducido. 


REPETICION EN 


En este tipo de sentencias, la variable (Y en este caso) sólo puede ser una 
letra. 


Dentro de un bucle FOR-TO/NEXT puedes meter otro bucle FOR-TO/NEXT 
con la única condición de que no se crucen. Observa el siguiente esquema: 


FORA= TO.... 


FOR B= 
' Primero ejecutaré este 


bucle completo con 
cada valor de A y 
todos los de B. 
Después sigo 


NEXT B 


NEXT A 


¿Recordamos la tabla de multiplicar por 3, por 4 y por 5? 
En este tipo de bucles (anidados) funciono de la siguiente forma: 
Cojo el primer valor del primer bucle y con este valor me recorro completa- 


mente el bucle anidado; una vez realizado esto, cojo el siguiente valor del pri- 
mer bucle y vuelvo a recorrerme el bucle anidado, y así sucesivamente. 


20 EJERCICIOS DE REPETICION 


Ejercicio 26 

Usando el ciclo FOR/NEXT haz un programa que te imprima la columna O 
con la palabra ““columna””. 
Ejercicio 27 


El mismo, pero que se imprima en la columna 12. 


Ejercicio 28 


El mismo, pero que llene toda la pantalla. 


Ejercicio 29 


Inserta las líneas de programa suficientes como para conocer el número de 
veces que se ha impreso la palabra “columna”. 


Ejercicio 30 


Escribe un programa que te dé en pantalla los números impares del 1 al 50. 


Ejercicio 31 


Modifica el programa anterior de forma que sólo responda la suma de los nú- 
meros impares del 1 al 50. 


Ejercicio 32 


Escribe un programa con un “parpadeo” lento. 
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Ejercicio 33 


Con dos bucles FOR/NEXT enlazados crea una imagen de puntos en pantalla 
similar a ésta: 


Cómo interpretas este programa: 
5PFORE=1T02 

10LETE=1 

20 LETA=2 
30LETC=E+A 

40 PRINTC 

50 NEXT E 


12 SOLUCIONES 


Ejercicio 26 


Programa Comentarios 


5 FORX=0TO0 21 Se imprime la palabra “columna” 22 veces a par- 
tir de la columna 4 y línea tras línea. 


10PRINT “COLUMNA” 
20 NEXT X 


Ejercicio 27 

Programa Comentarios 

5 FORX=0T021 TAB 12 obliga a comenzar en la columna 12 
10PRINT TAB 12; “COLUMNA” 

20 NEXT X 


Ejercicio 28 

Programa Comentarios 

5 FORX=0T0 21 El ; obliga a imprimir una palabra tras otra. La 
línea 30 obliga a repetir ei ciclo FOR/NEXT 

10PRINT “COLUMNA”; hasta que aparezca el mensaje scroll?, Si aprietas 
cualquier tecla excepto N o BREAK, el proceso se 

20 NEXT X repetirá. 


30 GOTO 5 


Ejercicio 29 
Programa Comentarios 


4LETC=0 Hemos incorporado un contador 


SOLUCIONES EN 


5 FORX=0T0 21 

10 PRINT “COLUMNA” 
11LETC=C+1 

20 NEXT X 

30 GOTO 5 


Ejercicio 30 

Programa Comentarios 
10 FOR X = 1 TO 50 STEP 2 

20 PRINTX, 

30 NEXT X 


Ejercicio 31 


Programa Comentarios 
5LETC=0 

10 FOR X= 1 TO 50 STEP 2 

11LETC=C+X 

30 NEXT X 


35 PRINT AT 21,0; 
“VALOR DE LA SUVMA...”;C 
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Ejercicio 32 


11 FORX=0T0 10 Los bucles FOR/NEXT no se pueden cruzar, pe- 
ro, evidentemente, sí se pueden suceder. 


20 PRINT AT 13, 15; “BASIC” Escribe la palabra BASIC en negativo. 
50 NEXT X 

60 FOR X= 1 TO 10 

70 PRINT AT 13, 15; “BASIC” 


80 NEXT X 

90 GOTO 10 

Ejercicio 33 

Programa Comentarios 

10 FORF=0T0 21 Observa cómo varía el valor de entrada del segun- 


do bucle (C) con el valor de entrada del primero 
(F) y consiguientemente, el lugar de arranque de 
PRINT 

20 FORC=FTO31 

30PRINTATF,C;”.” 

40 NEXT C 


50 NEXT F 


SUBRUTINAS ES 


Parece claro en razón de lo dicho hasta aquí y por los ejercicios realizados 
que un programa es una rutina. Constantemente repito el mismo proceso siempre 
que me pidas que ejecute el mismo programa. Hay muchas ocasiones que, den- 
tro de un mismo programa, se repiten algunas líneas de programa una y otra 
vez. Para evitar estas repeticiones innecesarias, el BASIC nos provee de unas ins- 
trucciones (GOSUB y RETURN), gracias a las cuales sólo es necesario escribir 
esas líneas específicas una sola vez. 


Si asociamos programa a rutina, será inmediato concluir que una subrutina es 
un programa que está dentro de una rutiná general o programa.. 


En inglés, en el supuesto que quisieras mandar a alguien a una subrutina, di- 
rías “go subrutine” (ve a subrutina) y para volver de ella dirías “return” (vuel- 
ve). Y de aquí las instrucciones BASIC que yo interpreto como órdenes para 
salir del programa principal, seguir mi proceso de trabajo en la subrutina 
(GOSUB) y, cuando encuentre la instrucción RETURN, volver al programa 
general justo en línea que siga a la GOSUB. 


Estas dos instrucciones —complementarias— son muy fáciles de aplicar y un 
ejemplo te ayudará a entenderlas. 


10 REM Aplicando subrutinas 


20 PRINT “Primer sumando?” 


30 INPUT A 
40 GOSUB 200 
50 PRINT “Segundo sumando?” 
60 INPUT B 
70 GOSUB 200 
80 LETC=A+B 
90 PRINT “La suma es ”'; C 
100 GOSUB 200 
110 STOP 
200 FOR X=0T0 31 


EN SUBRUTINAS 
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ZI0PRINT ">"; 
220 NEXT X 
230 RETURN 


Este programa mantiene la estructura fundamental del que venimos usando, 
pero, aparte de los GOSUB que has introducido y que comentaremos a conti- 
nuación, observarás una sentencia STOP, cuya misión fundamental es DETE- 
NER la ejecución del programa al llegar.a la línea donde el programa general 
acaba propiamente. 


Cuando un programa es detenido por un STOP puede ponerse en marcha 
nuevamente con una instrucción CONTINUE —en el teclado CONT soure la 
tecla C—. 


Como ya sabes, yo leeré las instrucciones 10, 20... pero al llegar a la 30 me 
encuentro con una orden clara de dirigirme a la línea 200. Una vez allí inter- 
ceptaré y ejecutaré las líneas 200, 210, 220... y al llegar a la 230 una tajante 
instrucción RETURN me obliga a volver al programa principal y justamente a 
la línea 50 que es la siguiente a la línea que contenía el GOSUB que me obli- 
9Ó a ir a la subrutina. Teclea el programa y córrelo. 


EJERCICIOS CON SUBRUTINAS ra 


Ejercicio 34 


¿Se te ocurre alguna forma de combinar el programa del ejercicio 33, con el 
ejercicio 32, para que, convirtiendo éste en una subrutina de aquél, la palabra 
BASIC cruce parpadeando la pantalla de izquierda a derecha? 


Ejercicio 35 


Escribe un programa para obtener la tabla de multiplicar por 5, separando 
cada número por una línea de asteriscos. 


5PORO= O 


RAKARAAAA A 


SPORT= 5 


KK AAA A A A 


5 POR 2= 10 


RARA AAA AA 


5POR3=15 


AAA AA AA AA 


5 POR 4= 20 


ARK AA AAA AA 


5POR5=25 


AAA AA AA AA 


5 POR 6=30 


RAKAKA AAA AAA 


5 POR 7 = 35 


AAA AAA 


5 POR 8= 40 


RARA AAA AA 


5 POR 9=45 


AAA AA A A A A 


5 POR 10=50 


KARA AAA AA 


Ejercicio 36 


Haz de nuevo el ejercicio 1 con una subrutina, de forma que te pregunte por 
pantalla: “NUMERO?” antes de la entrada de cada número y te dé las **GRA- 
CIAS” después. Limítalo a cinco sumandos. 


ES EJERCICIOS CON SUBRUTINAS 


Ejercicio 37 


Cómo aprovecharías las subrutinas del ejercicio anterior para usarlas en las 
del ejercicio 3A. 


NOTA: Pon las subrutinas sólo si te ahorran trabajo personal e instrucciones. 


SOLUCIONES ES 


Ejercicio 34 
Programa Comentarios 


1FORF=0TO 21 En este ejercicio se anidan dos bucles FOR/ NEXT 
con una subrutina. 


20 FORC=FTO 31 
30 GOSUB 90 

40 NEXT C 

50 NEXT F 

90 FORY=0T02 


100 PRINT AT F,C; “BASIC” 
Escribe BASIC en negativo 


110 CLS 

140 PRINT AT F,C; “BASIC” 
160 NEXT Y 

170 RETURN 


Ejercicio 35 

10 FORX=0T0O 10 
20LETA=X*5 

30 PRINT “5POR ”; X;“=""; A 
40 GOSUB 100 

50 NEXT X 

100 PRINT “Peer 
110 RETURN 


ES SOLUCIONES 


Ejercicio 36 


Programa Comentarios 


5 GOSUB 100 Las subrutinas conviene ponerlas después de la úl- 
tima instrucción del programa. 


10 INPUT N1 

15 GOSUB 200 

16 GOSUB 100 

20 INPUT N2 

25 GOSUB 200 

26 GOSUB 100 

30 INPUT N3 

35 GOSUB 200 

36 GOSUB 100 

40 INPUT N4 

45 GOSUB 200 

46 GOSUB 100 

50 INPUT N5 

55 GOSUB 200 

60 LETS = N1 + N2 + N3 + N4 + N5 
70 PRINT “ LA SUMA ES ”;S;”” DE NADA” 
80 STOP 

100 PRINT “NUMERO?” 

110 RETURN 


SOLUCIONES ES 


200 PRINT “GRACIAS” 
210 RETURN 


Ejercicio 37 


En general puedes aprovechar cualquier programa como una subrutina de 
cualquier otro. Basta con que no olvides la instrucción RETURN y no duplicar 
las variables con lo cual perderías información o provocarías errores. 


ARRAYS? COMO SE UTILIZAN 


Una guerra... no importa contra quien. 


La batalla va a comenzar. 


Los jefes y oficiales de las fuerzas a tu mando se reúnen contigo, que es 
quien tiene la responsabilidad de la operación, para recibir instrucciones respec- 
to a la forma de distribuir las tropas. 

Todos esperan, ansiosos, tus Órdenes. 

Los miras y les dices: 


“Caballeros, que cada cual se ponga donde le plazca”. 


El combate comienza necesitándose urgentemente la colaboración de la arti- 
llería, tus ayudantes buscan a los artilleros y no los encuentran. 


Igual sucede con los infantes, los blindados, la intendencia... 


Salvo que tu eventual enemigo quede desconcertado por tu “estrategia”, el 
resultado de esta imaginaria batalla está claro. 


Lo usual es preparar un orden de combate que permita hacer maniobrar a las 
distintas unidades según convenga y de forma rápida y precisa. 


Vamos a hacer un esquema. 


ESQUEMA DE LAS TROPAS EN 


DISPOSICION ESQUEMATICA DE LAS TROPAS 


FUERZAS JEFE 
DE AL 
COMBATE MANDO 


SECTOR INFANTERIA | CORONEL 
1 1 VALIENTE 
ENEMIGO SECTOR INFANTERIA | CORONEL 
2 2 BRAVO 
SECTOR CARROS CAPITAN 
3 1 ACERO- 
SECTOR ARTILLERIA | CAPITAN 
4 101 OBUS 
IMAGINARIO SECTOR INFANTERIA | CORONEL 
5 3 AUDAZ 
SECTOR INFANTERIA | CORONEL 
6 4 VIVO 


En este supuesto hay 6 sectores de combate. 


u 
E 
<X 
co 
2 
je] 
0) 
u 
[a] 
< 
Z 
O 
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Si hubiera 3000 y te resultara imprescindible saber qué fuerzas hay en el sec- 
tor 1121 y quién las manda, quizás te puedas imaginar el lío. 


Para hacer el ejemplo fácil de manejar por mí y de seguir por tí lo dejaremos 
como está en el esquema. 


RECUERDA: 


Una variable de caracteres queda representada por UNA SOLA LETRA se- 
guida del símbolo $. 


ra ESQUEMA DE LAS TROPAS 


En función de lo que ya conoces, el significado de F$ representa una variable 
de caracteres y nada impide que la hagas igual a cualquier cadena de caracteres 
Por ejemplo: 

FS = “INFANTERIA 1” 

Por idénticas razones podrías escribir: 

IS = “CORONEL VALIENTE” 

y de esta forma podrías seguir: 

AS =“INFANTERIA-2” 

B$ =“CORONEL BRAVO” 

C$ =“CARROS-1” 

E$ =“CAPITAN ACERO” 

FS =“ARTILLERIA 101” 

G$ =“CAPITAN OBUS” 

= “INFANTERIA-3"” 

= “CORONEL AUDAZ” 
= “INFANTERIA-4” 

= “CORONEL VIVO” 


Y así, continuarías hasta que... 


Se acabaran las letras y te quedaras sin variables y poco o nada habrías con- 
seguido. 


Vamos a usar un ARRAY de caracteres. 
Anticipo que hay dos tipos de ARRAY: 
— numéricos (trabajan sólo con variables numéricas) 


— caracteres (trabajan con variables de caracteres) 
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Compara las instrucciones anteriores con las que siguen. Estudia las diferen- 
cias y los comentarios. 


Comentarios 


FS (1) = “INFANTERIA-1”... A la variable de caracteres F$ la hemos con- 
vertido en F$ (1) esto, en argot, sería decir: EFE DOLAR DE UNO O EFE DO- 
LAR SUBUNO, es decir, una variable de caracteres con subíndice (representado 
por (1)), es igual, en este caso a INFANTERIA-1. 


Observa que la cadena de caracteres INFANTERIA-1 tiene 12 caracteres. 


FS (2) = “INFANTERIA-2”... EFE DOLAR DE DOS es igual a una cadena 
de caracteres de 12 caracteres. 


F$ (3) = “CARROS-1”... También podrías decir que EFE DOLAR DE TRES 
tiene 8 caracteres. 


FS (4) = “ARTILLERIA-101”.... También: EFE DOLAR SUB 4 tiene 14 
caracteres. 


FS (5) = “INFANTERIA-3"... F$ (5) tiene 12 caracteres. 


FS (6) = “INFANTERIA-4”... FS (6) tiene 12 caracteres. 


En este caso F$ es el prefijo y el número entre paréntesis es el sufijo. 


Compara las instrucciones anteriores con las que siguen. 


Comentarios 


F$ (1,12)... EFE DOLAR DE UNO, DOCE O EFE DE DOLAR SUBUNO, 
DOCE. 


Esto quiere decir que la variable de caracteres F$ (1) puede tener hasta 12 
caracteres. 


FS (2,12). La variable de caracteres F$ (2) puede tener hasta 12 caracteres. 


F$ (3,8)... La variable F$ (3) puede tener hasta 8 caracteres. 


FS (4, 14)... La variable F$ (4) puede tener hasta 14 caracteres. 


za ESQUEMA DE LAS TROPAS 


FS (5, 12)... FS (5) puede tener hasta 12 caracteres. 
FS (6,12)... F$ (6) puede tener hasta 12 caracteres. 


De todas las variables de caracteres F$ anteriores la que admite más caracte- 
res es, en este caso, la F$ (4,14). 


El número total de variables cuyo prefijo sea F$ es 6. 


Si yo me encontrara en una línea de programa, la instrucción DIM F$ (6,14) 
inmediatamente reservaría en mi memoria espacio suficiente para aceptar 6 
VARIABLES DE CARACTERES QUE EMPIECEN POR F$ Y QUE PUEDAN 
TENER HASTA 14 CARACTERES. 


En nuestra “batalla'” hemos asimilado DIM F$ (6,14) a 6 “sectores de com- 
bate”” en los cuales hay unas tropas que puedes denominar como quieras siem- 
pre que tengan hasta 14 caracteres. En este caso F$ es el prefijo. 


Si escribieras DIM J$ (6,15), y siempre referido a nuestro esquema principal, 
estarías en condiciones de darme 6 “jefes al mando”” cuya denominación no 
tenga más de 15 caracteres. En este caso J$ es el prefijo. 


Bueno, pues esto son ARRAYS de caracteres: 


“Conjunto de variables de caracteres con el mismo prefijo y el mismo límite 
de cantidad de caracteres que puede aceptar””. 


Ejemplo: 
Si yo me encuentro la instrucción: 
DIM L$ (100,25) 
yo la interpretaría como: 


“Dimensiona un conjunto de 100 variables de caracteres que todas tengan el 
prefijo L$ y que sean capaces de aceptar hasta 25 caracteres cada una”. 


Bueno. ¿Y qué? Dirás tú. 
No seas impaciente y sigamos con nuestro ejemplo. 
A través de las sentencias DIM yo sé las dimensiones y las denominaciones de 


los ARRAYS que voy a utilizar... pero estos ARRAYS están vacíos porque no 
contienen información. Están disponibles. 


ESQUEMA DE LAS TROPAS MS 


En nuestra “batalla” tú utilizas F$ para introducir en mi memoria, por secto- 
res, las Fuerzas de Combate y J$ para introducir los Jefes de las mismas. 


¿Cómo me lo debes decir? 


Empecemos a programar usando ARRAY de caracteres: 


Programa Comentarios 


30 DIM F$ (6.14)... Me ordena dimensionar un ARRAY de caracte- 
res de 6 variables y hasta 14 caracteres cada una, 
y cuyo prefijo es F$. 
De momento está vacío. No contiene nada. 


40 DIM J$ (6.15)... Me ordena dimensionar un ARRAY de caracte- 
res de 6 variables y hasta 15 caracteres cada una, 
y cuyo prefijo es J$. 
De momento está vacío. No contiene nada. 


50 PRINT “SECTOR?”; Me ordena imprimir ““SECTOR?”. (deja 2 espa- 
cios entre ? y ””). 


60 INPUT S... Espero la entrada de un número, que en nuestro 
caso deberá estar comprendido entre 1 y 6, am- 
bos inclusive, y que corresponderá a “un sector 
de combate”. 


70 PRINTS... Imprimo el valor de S después de “SECTOR”? 
puesto que el ; de la línea 50 me obliga a ello. 


80 PRINT “FUERZAS?”;  Imprimo “FUERZAS?” dejando dos espacios 
entre ? y ”. El ; obliga a la siguiente impresión 
a ponerse justo a continuación. 


90 INPUT F$ (S)... Espero la entrada de una variable de caracteres. 
Por tener el prefijo F$, yo introduciré este valor 
en el ARRAY, dimensionado en la línea 30, 
La S entre paréntesis tendrá el valor que haya re- 
cibido en la línea 60. 
El número de caracteres está fijo y definido en la 
línea 30, no se puede pasar de 14. 
Esto quiere decir que si el valor de S (que tú darás al 
correr el programa, a través del teclado) fuera por 


ES ESQUEMA DE LAS TROPAS 


ejemplo 2, yo estaré esperando que me fijes el 
valor de la variable F$ (2.14). 

El ARRAY se va llenando. Va conteniendo in- 
formación. 


100 PRINT FS (S) Imprimo el texto que hayas introducido en la 
línea 90 y justo a continuación de lo impreso 
por la línea 80. 


110 PRINT“IEFE?”: Imprimo JEFE? dejando dos espacios entre ? y 
"El ; obliga a la siguiente impresión a ponerse 
justo a continuación. 


120 ¡NPUT J$ (S) Vale el mismo comentario de la línea 90, pero 
referido al prefijo J$ y al ARRAY dimensionado 
en la línea 40. 


130 PRINT J$ (S) Imprimo el texto que hayas introducido en la 
línea 120 y justo a continuación de lo impreso 
por la línea 110. 

140 GOTO 50 Me ordena: VETE a la línea 50. 


NOTA: A partir de ahora, cuando quieras correr un programa no aprietes RUN, 
ENTER; es mejor que sigas este procedimiento: 


1. GOTO (número de la línea de programa desde donde quieres hacer funcio- 
nar el programa). 


Z. ENTER 
Ya te explicaré la razón más adelante. 


¿Has introducido ya el programa? 
Teclea GOTO 30, ENTER. 

En la pantalla aparece: SECTOR? 
Aprieta 1 y ENTER. 

Ahora te pregunto: FUERZAS? 
Teclea: INFANTERIA—1 y ENTER. 


ESQUEMA DE LAS TROPAS ES 


JEFES 
Teclea: CORONEL VALIENTE. 


(Observa como, si dejas un espacio entre CORONEL y VALIENTE yo te im- 
primo CORONEL VALIENT). 


¿Sabes por qué? Porque sólo admito 15 caracteres. 


Vuelvo a preguntarte SECTOR?, después FUERZAS?, JEFE? 


Deberás seguir este ciclo 6 veces que son los sectores de combate, y que, por 
otro lado, es el número máximo de variables de caracteres que voy a admitir 
(DIM F$ (6,14) y DIM J$ (6,15)). 


Prueba a meter un sector 7 y te daré un mensaje de error, con lo cual te digo 
que el subíndice 7 está fuera de la dimensión que me has dado y que por esa 
razón estoy parado en la línea 90, 

Lista el programa de nuevo (LIST, ENTER). ¿Lo has hecho? 


Probablamente pienses que ya no se qué fuerzas hay en el sector 3 y quién 
las manda. 


Vamos, vamos... teclea. 


Proceso Comentarios 


PRINT FS (3) Me ordena imprimir el valor que tengo en memo- 
ria para la variable F$ (3). y ahora 


PRINT JS (3) Lo mismo para la J$ (3). 


A veces pienso que me menosprecias. 


Si acaso se te ocurriera correr el programa apretando RUN, ENTER, te obe- 
decería claro, pero borraría el contenido de todas las variables; por eso, es 
mejor usar GOTO seguido del número de la primera línea de programa útil. 


Este programa lo puedes llamar “BATALLA”. 


Guarda (SAVE) este programa, tal como está, en un casete. 
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Desconéctame. 


Ahora vuelve a cargarme (LOAD). ¿Ya? 


Aprieta: 


PRINT F$ (5) (ENTER, claro). 
Y después 
PRINT J$ (5) (¡No te olvides nunca de ENTER!). 


¡Toda la información está guardada en el casete! Tanto el programa como el 
contenido de las variables. 


Lista el programa (LIST, ENTER). 


Para tener una visión general de los sectores, las fuerzas y sus jefes, deberás 
insertar estas líneas: 


Programa Comentarios 


150 FORS=1TO6 Con este bucle FOR NEXT. La variable S coge 

160 PRINTS: ”: todos los valores del 1 al 6, imprimiendo S, dejan- 

ESAS): ” 0". 3$ (s) do un espacio, imprimiendo F$ (S), dejando un 
A espacio e imprimiendo J$ (S). 


170 NEXT S 
Para obtener esta información te verás obligado a teclear: 


GOTO 150, ENTER, ya que si teclearas 


GOTO 50, ENTER, el programa correría hasta la línea 140 donde la senten- 
cia GOTO 50 me haría empezar de nuevo. 


Prueba ambas alternativas. 


Graba en el casete este programa sobre el anterior. Lo puedes llamar **BATA- 
LLA”. 


Manejar el ARRAY con soltura te será de mucha utilidad. 


Repasa bien este capítulo y haz los EJERCICIOS CON ARRAYS DE CARAC- 
TERES. 


EJERCICIOS CON ARRAYS DE CARACTERES ES 


Ejercicio 38 

Dimensiona un ARRAY de caracteres que permita alojar las variables de ca- 
racteres de hasta 5 caracteres cada una. 
Ejercicio 39 


Dimensiona otro ARRAY para 5 variables de hasta cuatro caracteres. 


Ejercicio 40 
¿Qué significan estas líneas de programa? 
10 DIM AS (15,5) 
15 DIM B$ (15,5) 
Ejercicio 41 
Haz un programa que te permita dar valores automáticamente a las 4 varia- 


bles del ARRAY DIM AS (4,7). 


Ejercicio 42 


Interpreta este programa: 


10 DIM AS (4,7) 

20 DIM B$ (4,7) 

30 FORX = 1TO4 

40 LET B$ (5-X) = AS (X) 
50 NEXT X 


Ejercicio 43 


Escribe un programa que ponga en orden alfabético no más de 4 palabras de 
hasta 7 letras cada una. 


Ejercicio 38 
DIM AS (4,5) 


Ejercicio 39 
DIM A$ (5,4) 


Ejercicio 40 
Los ARRAYS en general se dimensionan al principio de los programas. 


En este caso tenemos dos ARRAYS de caracteres (símbolo $) denominados 
A y B pudiendo contener cada uno de ellos 15 variables de hasta 5 caracteres. 


Ejercicio 41 


Programa Comentarios 


10 DIM AS (4,7) Si alguna de las 4 variables tuviera más de 7 carac- 
teres, yo ignorar ía el exceso. 


20 FORX=1T04 
30 INPUT AS (X) 
40 NEXT X 


Ejercicio 42 


Se transfieren los valores de las variables contenidas en el ARRAY AS al B$ 
de tal forma que A$ (1) = B$ (4), AS (2) = BS (3), y así sucesivamente. 


SOLUCIONES ras 


Ejercicio 43 

Programa Comentarios 

10 DIM AS (4,7) Con las cuatro primeras instrucciones introduci- 
mos las palabras que valoran las variables de 
ARRAY. 

20 FOR X=1T04 

30 INPUT AS (X) 

40 NEXT X Con el resto de las instrucciones se comparan 
todas las variables del ARRAY, ordenándolas, 
según el “peso”” relativo que yo tengo de ellas y 
que corresponde a su orden alfabético. 

40 NEXT X 


50 IF AS (1) < = AS (2) 
THEN GOTO 90 


60 LET B$= AS (1) 
70 LET AS (1) = AS (2) 
80 LET AS (2) = B$ 


90 IF AS (2)< = AS (3) 
THEN GOTO 140 


100 LET B$= AS (2) 
110 LET AS (2) = AS (3) 
120 LET A$ (3) = B$ 
130 GOTO 50 


140 1F AS (3) < = AS (4) 
THEN GOTO 190 


150 LET B$ = AS (3) 
160 LET AS (3) = AS (4) 


ras SOLUCIONES 


170 LET AS (4) = B$ 
180 GOTO 90 

190 PRINT AS (1) 
200 PRINT AS (2) 


210 PRINT A$ (3) 


220 PRINT AS (4) 


EJERCICIOS CON ARRAYS NUMERICOS ras | 


Supongamos ahora que acabas de comprar una tienda de ropa y me quieres 
usar como caja registradora. 


Supongamos también que, de momento, tienes tres artículos en stock: artí- 
culo 1, artículo 2 y artículo 3; y los precios unitarios de venta son 10, 20 y 30 
europesetas. 


Para que yo te pueda ser útil debes desarrollar un programa que me haga fun- 
cionar como una caja registradora. 


Con los conocimientos de BASIC que tienes hasta ahora, éste podría ser un 
primer programa: 
Programa Comentarios 
1 REM “CAJA Con estas instrucciones doy valor (0) a las varia- 
REGISTRADORA” bles A, B y C, las cuales representan el importe de 

la venta por artículo (1, 2, 3). 

3LETA=0 
4LETB=0 


5LETC=0 


TO:CLS Limpio la pantalla 


15 PRINT “ARTICULO N?” Estas dos instrucciones piden el número de iden- 
tificación del artículo (1,2 6 3) 


20 INPUT N 


25PRINT “UNIDADES Estas dos instrucciones piden la cantidad vendida 
VENDIDAS ?” del artículo anterior. 


30 INPUT V 

39 LETP1= 10 Se definen los precios de los artículos. 
40 LET P2= 20 

45 LET P3 =30 
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50IFN=1 THEN LET Según el artículo vendido determino el importe 
A=P1*V de la venta 


55 1FN=2 THEN LET 
B=P2* V 


60 1FN=3 THEN LET 
=p W 


65LETT=A+B+C T representa el total sucesivo. 
70PRINT “OTRO AR- Esta bifurcación me lleva al principio del progra- 
TICULO? S/N” ma si hay otro artículo vendido o nos da el total 
por venta si hemos llegado al final. 
75 INPUT R$ 
80 IF R$= “S” THEM GOTO 10 
85 PRINT AT 21,0;”TOTAL VENTA”, T 
Es evidente que, si para una tienda con tres artículos has necesitado un pro- 
grama de 17 líneas de programa, para el caso de 3.000 artículos hubiera sido 


una tarea de “chinos” confeccionar el programa. 


Para evitarte esta tediosa tarea, el BASIC dispone de los ARRAYS numéri- 
cos. 


Si recuerdas el caso de los ARRAYS de caracteres, los subíndices representa- 
ban: el primero, el número de variables de caracteres que lo integraban; y el se- 
gundo, el número de caracteres máximos que forman cada variable. 


En los ARRAYS numéricos, por el contrario, los subíndices sólo fijan una, y 
sólo una, de las variables numéricas que integran el ARRAY. Nada más. 


El ARRAY numérico se representa en la misma forma que los caracteres, 
pero sin el símbolo $. 


Todo ARRAY numérico debe ir precedido por la sentencia DIM —letra— se- 
guida por un paréntesis donde se indique el número de variable que contenga. 
Por ejemplo: 
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Variables que comprende 

P (1), P (2), P (3), P (4), P (5), P (6) 
P11,14P11,2%P- 1,3) 

PIP 12.21:P:12.3) 

PAT HPATZ 

PUZTN PEZ) 

P (3,1), P (3,2) 


En los números anteriores los tres ARRAY pueden contener el mismo núme- 


ro de variables: 


1 * 6 = 6 variables 
2 * 3 = 6 variables 
3 * 2 = 6 variables 


El programa de la caja registradora podría quedar transformado, usando un 
ARRAY numérico y siguiendo las instrucciones anteriores, en: 


Programa 
1LETC=0 
5 DIMP (3) 


10DIMT (3) 


15 FOR X=1T0'3 


20 PRINT “PRECIO 
DEL ARTICULO”; X 


Comentarios 
Dimensiono un ARRAY numérico de tres variables 
numéricas denominadas P. (P (1), P (2) y P (3)). 
Aquí almacenaré los precios de los tres artículos 


(1,23) 


Dimensiono otro ARRAY de las mismas caracte- 
rísticas que el anterior pero denominado T. 


Este bucle FOR/NEXT cogerá, como ya sabes, los 
valores 1, 2 y 3 sucesivamente. Preguntando por 
los precios de los artículos 1, 2 y 3. De esta mane- 
ra P (X) cogerá los valores P (1) = 10, P (2) = 20 y 
P (3) = 30 
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25 INPUT P (X) 

30 NEXT X 

35 CLS 

40 PRINT “ARTICULO 
NUMERO?” 

50 INPUT N 


55 PRINT “UDS. VEN- 
DIDAS?” 


60 INPUT V 


65 IF P(N)<> 0 THEN 
LETT=P(N) * V 


7OLETC=C+ 1 


79LET TAGÍ=T 


80 PRINT “OTRO 
ARTICULO?” 


85 INPUT R$ 


Hecho lo anterior, limpio la pantalla. Las variables 
numéricas están definidas. 


Aquí propiamente empieza el programa de caja 
registradora, y, pregunto por el número del ar- 
tículo vendido. 


Determina el número de unidades vendidas del 
artículo anterior. 


Según el artículo vendido (N) determino el precio 
de venta. 


Contador cuyo valor será primero 1, luego 2 y fi- 
nalmente 3. 


Instrucción que me sirve para poder dar valor a las 


tres variables que configuran el ARRAY definido 
en la línea 10. 


Esta bifurcación me lleva al principio del progra- 
ma si hay otro artículo vendido o me indica que 
sume el valor de las tres variables del ARRAY 
DIM.T e imprima el resultado. 


90 IF R$=*"S” THEN GOTO 35 
95 PRINT AT 21,0; “TOTAL VENTA”, 


TM + T (2) +73) 


A simple vista puede que te parezca más largo este programa que el anterior; 
no obstante, con ligeras modificaciones, podrías tenerlo dispuesto para cual- 


quier cantidad de artículos. 


EJERCICIOS CON ARRAYS NUMERICOS ES 


Debes recordar que, una vez valoradas las variables del ARRAY de precios 
P (1), P (2) y P (3), no hace falta que cada vez que uses el programa les vuelvas 
a dar valores; para ello no aprietes RUN y ENTER, ya que así borras el conte- 
nido de todas las variables. 


Basta con que teclees GOTO 40 y ENTER y así pasa a correr el programa 
desde la pregunta “ARTICULO NUMERO?””. 


Si te interesa conocer el contenido de alguna variable, P (2) por ejemplo, 
bastaría con que apretaras: PRINT P (2), ENTER y yo te diré el valor de esa 
variable. 
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Ejercicio 44 


Dimensiona un ARRAY numérico que pueda contener hasta 10 variables nu- 
méricas. 


Ejercicio 45 


Escribe un programa que te permita valorar las 10 variables numéricas del 
ARRAY anterior. 


Ejercicio 46 


Dimensiona un ARRAY numérico bidimensional que pueda contener hasta 
10 variables numéricas. 


Ejercicio 47 


Escribe un programa que te permita valorar las 10 variables numéricas del 
ARRAY anterior. Guarda en un casete el programa y el ARRAY valorado. 


Ejercicio 48 


Inserta las instrucciones oportunas al programa anterior para que te pregun- 
te si quieres conocer el valor de alguna de las variables del ARRAY, y, en caso 
afirmativo, te pregunte la fila y la columna, imprimiendo el contenido de esa 
variable en la pantalla. 


Ejercicio 49 


Carga el programa del ejercicio 47 y, sin modificar el valor de las variables, 
adapta el listado de forma que, automáticamente, se valoren las variables del 
ARRAY DIM W (2,5) con la condición de que los sucesivos valores del ARRAY 
A se multipliquen por 2 si son mayores que 50 y se eleven al cuadrado si son 
menores y se transfieran, con esta condición, al ARRAY W, 
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SOLUCIONES 120 


Ejercicio 44 


DIM A (10) 


Ejercicio 45 


10DIMA (10) 

20 FORX=1T0 10 
30 INPUT A (X) 

40 NEXT X 


Ejercicio 46 
DIM A (2,5) 


Ejercicio 47 
10 DIM A (2,5) 
20 FORX=1T02 
30 FOR Y =1T05 
40PRINT “VALOR”;X;”,”;Y;“DEL ARRAY NUMERICO A” 
50 INPUT A (X,Y) 
60 NEXT Y 
70 NEXT X 
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a SOLUCIONES 


Ejercicio 48 
10 DIM A (2,5) 
20 FORX=1T02 
30 FORY=1T05 
40PRINT “VALOR”; X;”,”, Y, "DEL ARRAY NUMERICO A” 


50 INPUT A (X, Y) 


60 NEXT Y 
70 NEXT X 


100 PRINT AT 20,0; “QUIERES CONOCER EL VALOR 
DE ALGUNA VARIABLE?” 


110 INPUT R$ 

115 CLS 

120 1F R$=“N" THEN STOP 
130 PRINT “FILA?” 

140 INPUT F 

145 PRINT F 

150 PRINT “COLUMNA?” 
160 INPUT C 

165 PRINT C 

170 PRINT A (F.C) 

180 GOTO 100 
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SOLUCIONES 1-26 


Ejercicio 49 
5 DIM W (2,5) 
10 DIM A (2,5) 
20 FORX=1T02 
30 FOR Y =1TO5 
52 IF A (X,Y) < = 50 THEN GOTO 57' 


53 LET W (X, Y) = A (X,Y) * 2 


57 LET W (X,Y) = A (X, Y) 1 2 
60 NEXT Y 
70 NEXT X 
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ALGUNOS CONSEJOS POSTERIORES 


El código de errores te orientará casi siempre para saber por qué no quiero 
seguir funcionando. 


A veces el mensaje de error te lo daré yo colocando una ? parpadeando en el 
lugar donde se haya producido el fallo de sintaxis o forma de escribir en el len- 
guaje BASIC. En estos casos bastará con que desplaces el cursor hasta donde 
está situada la ? y rectifiques oportunamente. P. ej.: 


10PRINT J” al apretar ENTER aparecerá la ? a la izquierda 
de la J, indicando que faltan comillas. 


No obstante, habrá ocasiones en que, aun sabiendo que el error es de sinta- 
xis, no sabrás cuál es la causa. En esta situación lo mejor, y probablemente 
más rápido, será borrar la línea y buscar otro modo de darme la instrucción. 


El consejo anterior es igualmente válido para el caso de otro tipo de erro- 
res. 


No olvides que yo entiendo sólo las sentencias cuando me las das a través 
de la tecla correspondiente. No trates de escribirlas. P. ej.: 


10PRINT Apretar solo P... BIEN 
10PRINT Apretar P 

R 

| 


7 


Y ... hasta aquí el curso de iniciación para principiantes. ¿Seguimos? 


Sección ll 


Fichero de palabras 
del 
BASIC de SINCLAIR 


VOCABULARIO Y SU SINTAXIS 


Al llegar a esta sección del libro usted conoce los 
fundamentos del BASIC y, lo que es más importante, 
su cerebro se ha estructurado de forma que comprenda 
el funcionamiento de un ordenador al emplear un len- 
guaje de alto nivel. A partir de este momento avanzar 
a lo largo de esta segunda parte le resultará muy senci- 
llo, ya que el objeto de la misma es aumentar su “vo- 
cabulario””. 


Algunas de las instrucciones que vamos a estudiar 
son exclusivas del Spectrum y difícilmente las encon- 
trará, con idéntica aplicación, en otros ordenadores 
pero, una vez conocidas éstas, le será fácil interpretar 
otras cuya función sea similar. 
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El BASIC, como lenguaje de programación, está compuesto por un vocabulario y una 
sintaxis determinados. 


El vocabulario es el conjunto de palabras que representan a los diferentes comandos que 
acepta e interpreta. 


La sintaxis es el conjunto de normas que se deben seguir para escribir correctamente un 
programa. 


Esta sección está dedicada a estudiar, una a una y con ejemplos, todas las palabras que 
componen el BASIC de Sinclair y sus reglas de aplicación a excepción de las dedicadas a los 
gráficos, el manejar byte que verán en la SECCION III. 


Las primeras páginas introducen al lector en la estructura de las fichas y en alguno de los 
conceptos que en ellas se utilizan. 
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LINEAS DE PROGRAMA 


Una línea de programa constituye una sentencia que está formada por cuatro campos: 


PRIMER SEGUNDO TERCER CUARTO 
CAMPO CAMPO CAMPO CAMPO 


Número de Comando Implicaciones Fin de 
línea línea 


SENTENCIA 


También existen las líneas de programa que tienen varias sentencias: son líneas mul- 
tisentencia, y responden al esquema anterior, pero separando una sentencia de otra mediante 
separadores y que son los dos puntos (:). 


La estructura de una línea multisentencia es: 


dit ro Fin 
Comando Implicaciones Comando| |Implicaciones de 
pa línea 


> ee SENTENCIA 


LINEA MULTISENTENCIA 


Vamos a estudiar la línea de programa explicando cada uno de sus campos. 


Gracias al primero, se establece la secuencia de lectura de las líneas de programa, siendo, 
pues, imprescindible que los números de línea vayan de menor a mayor, justo en el orden 
que el programador desee que se ejecuten. 


Esto no implica que los números sean consecutivos. Lo más conveniente es numerar las 
líneas de diez en diez —o incluso más— de forma que siempre quede la posibilidad de intro- 
ducir nuevas líneas con números intermedios. 


Los ejercicios de los próximos epígrafes aclararán suficientemente este punto. 
El segundo y el tercer campos conforman el cuerpo de la sentencia y son el verdadero 
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objeto de este CURSO. No obstante, podemos anticipar que el segundo campo estará ocu- 
pado siempre por alguna de las palabras del vocabulario BASIC, y el tercer campo podrá es- 
tar ocupado por una variable, una constante, una expresión matemática o una cadena de 


caracteres. 
Entendemos por cadena de caracteres cualquier combinación de letras, números y 
símbolos. 


El cuarto campo está destinado a indicar al ordenador que la línea ha terminado y, 
por tanto, debe prepararse para recibir otra nueva. El comando destinado a este fin es ENTER. 


EJEMPLO: 


1 INPUT AS 
20 PRINT AS 


Este sencillo programa está compuesto por dos sentencias: 


— La primera está en la línea de programa número 1f y ordena al computador que 
espere la entrada (INPUT) de una variable alfanumérica denominada AS. 


— La segunda línea tiene el número 2f y ordena al computador que imprima en pax 
talla el contenido de la variable A$. 


Recuerde que después de escribir cada una de las líneas anteriores debe ieclear ENTER. 
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ALGORITMO EN 


Esta palabra se deriva de MUSA AL-KHOWARIZMI, nombre de un matemático árabe 
que vivió en el siglo IX. 


El diccionario define la palabra algoritmo como “método y notación en las distintas for- 
mas de cálculo.” 


Un algoritmo es, en definitiva, un conjunto de operaciones perfectamente especificadas 
cuyo objeto es obtener un resultado partiendo de unos datos. 


EJEMPLO: 
¿Cuál es el algoritmo que nos permite conocer la superficie de un cuadrado en función 
de la longitud de su lado? 


SOLUCION: 


S: superficie del cuadrado. 
l: lado del cuadrado. 


Algoritmo buscado: S=1 * 1 


En este caso, el dato necesario es la longitud del lado del cuadrado y el resultado que se 
obtendrá es la superficie de esta figura geométrica. 


_ El conjunto de operaciones de este algoritmo se reduce a multiplicar el valor de 1 por sí 
mismo. 


El algoritmo S = 1 * 1 es válido para cualquier valor de 1 y, en general, de las variables 
que intervienen. 
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ES CONSTANTES 


Todos los valores que permanecen invariables en un algoritmo se llaman constantes. 


EJEMPLO: 
S: superficie del triángulo. ÉR 
b: base del triángulo. S= > 


h: altura del triángulo. 


En este algoritmo, que determina la superficie de un triángulo, tenemos la constante 
1/2. 
Hay dos tipos de constantes: alfanuméricas y numéricas. 


Las constantes alfanuméricas están formadas por cualquier combinación de caracteres, 
siempre que estén escritos entre comillas. Por ejemplo, “SEAT 127” 6 “1, 2, 3... Responda 
otra vez”. 


Las constantes numéricas son números positivos o negativos, enteros o decimales, y no 
van entre comillas. La coma decimal se representa por un punto (.). 


Existen dos tipos de constantes numéricas: 


A.Enteras 
Están formadas por cualquier número, positivo o negativo, y no pueden tener deci- 


males. Por ejemplo, 21729 ó —18617. 


B. Reales 


Una constante real es cualquier elemento del conjunto de los números reales. Es decir, 
abarca todos los números positivos y negativos, enteros y decimales. Por ejemplo, 
217, -3142, 2.147 6 -34.4157. 
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VARIABLES 2-4 


Una variable representa un valor que puede cambiar a lo largo de un algoritmo, pero que 
permanece fijo mientras no haya una instrucción que indique lo contrario. Las variables 
también pueden ser numéricas y alfanuméricas. 


Las variables numéricas se representan por cualquier conjunto de caracteres, con la única 
condición de que el primero sea una letra. Por ejemplo, LET a= S;LET A =7;LETAB=1S, 
o LET AB1 = 45. 


Las variables alfanuméricas o de caracteres se representan por una sola letra, mayúscula 
o minúscula, seguida del símbolo $. De esta forma, el computador distingue que el conteni- 
do de esa variable es distinto de un número y lo interpretará como una cadena de caracteres. 
Esta cadena debe estar entrecomillada. Por ejemplo, LET a$ = “ordenador”, o LET P$ = 
= “país”. 


Se entiende por nombre de la variable cualquier combinación de caracteres —de acuerdo 
con la sintaxis anteriormente explicada— que la represente. En los ejemplos anteriores, he- 
mos denominado a, A, AB y AB1 las variables numéricas, y a$ y P$ las variables alfanumé- 
ricas. 
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ES EXPRESIONES 


Anteriormente nos hemos referido a las variables como elementos capaces de contener 
un valor. Una expresión, por el contrario, es un valor. 


Nada impide, sin embargo, que el valor de una expresión varíe de acuerdo con los valores 
de las variables que forman parte de la expresión. 


EJEMPLO: 


Definir una expresión que determine el valor del importe de una conferencia a Sevilla, 
sabiendo que cada “paso” cuesta 10 ptas. 


SOLUCION: 


Importe de la conferencia = 10 * n. 


En esta expresión tenemos: 


— Una constante numérica 10, que es el precio de un “paso”. 
— Una variable numérica n, que representa el número de “pasos”. 
4 p p 


Evidentemente, para cada valor de n tendremos un valor diferente de la expresión, que 
nos dará los diferentes importes de las conferencias a Sevilla, según su número de pasos. 


Las expresiones matemáticas se escriben en BASIC prácticamente igual que con lápiz y 
papel, pero con las variaciones impuestas por los símbolos que figuran en el teclado del or- 
denador. Tal es el caso, por ejemplo, de x? (equis elevado a 3), que nos obligará a teclear 
TI 


El orden de prelación de las diferentes operaciones matemáticas se verá más tarde, pero, 
antes de llegar al mismo, es importante hacer observar unas sutiles diferencias que existen 
entre escribir una expresión matemática a mano o en un computador. Supongamos que de- 


Lave .,.  a+b : 
seamos transcribir la expresión de forma entendible para el >»rdenador. Para lograrlo, 


no debemos olvidar ningún signo, como * entre 2 y c en el denominador, «y no magnificar 
la capacidad de la máquina, ya que: 


— Si escribimos a + b/2 * c, el ordenador interpretará a + 2 + C, 


A nt E , + 
— Si escribimos (a + b)/2 * c, interpretará pee * C. 


— Sólo podrá interpretar correctamente la expresión citada si escribimos (a + b)/(2 * c). 
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OPERADORES 


Los operadores son símbolos que representan el conjunto de todas las operaciones —arit- 
méticas o lógicas— que se pueden realizar entre valores. 


Estos valores pueden ser —obviamente—, a su vez, expresiones. Son los operandos. 


Como puede observarse en el ESQUEMA DE COMANDOS BASIC, se dispone de cuatro 
tipos de operadores: aritméticos, de relación, lógicos y funcionales. 


Se denominan así porque actúan entre valores aritméticos, siendo el conjunto de los sím- 
bolos que los componen y su orden de prioridad establecidos por el ordenador los siguientes: 


PRIORIDAD OPERACION OPERADOR 


máxima ———> exponenciación 


multiplicación y 


división 


suma y 


resta 


Para operadores de la misma prioridad, la máquina ejecuta las operaciones de izquierda a 
derecha. 


Las operaciones dentro de un paréntesis las efectúa primero y siguiendo el orden de prio- 
ridad anterior. 


EJEMPLO: 
(6*513/4+ D/G-P 


A E E 8 E Calcula la potencia 5 t 3 (5?) 

po > E : : Multiplica el resultado por 6. 

30: A Calcula 4 + 2 

Y _—_—_— i Divide el producto (2?) entre la suma (3*) 

E E Calcula 3 — 1 

a dl Divide el cociente (4?) entre la diferencia (6”). 
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Las cadenas de caracteres sólo pueden sumarse. 
La forma de yuxtaponer una cadena de caracteres a otra es intercalar entre ellas el ope- 
rador +. 


EJEMPLO: 
PROGRAMA COMENTARIO 
10 LET AS = “ABC” Con las líneas 10) y 20) asignamos valores a las varia- 


E bles de caracteres A$ y B$. 
20) LET B$ = “DEF” 


3 PRINT AS + BS Con la línea 30 ordenamos la impresión del conteni- 
do actual de A$ y B$, justamente uno a continua- 
ción del otro. 


El resultado de ejecutar este programa ( ¡recuerde: RUN!) será: 


ABCDEF 


OPERADORES DE RELACION 


Estos operadores sólo actúan en proposiciones entre dos operandos, cuyo resultado úni- 
camente puede ser CIERTO, que se representará por 1, o FALSO, que se representará por (). 


Sus símbolos son: 


igual que 

distinto que 
menor que 

mayor que 

menor o igual que 


mayor o igual que 


Si un operador de relación compara dos expresiones en las que intervienen operadores 
aritméticos, antes de efectuar la comparación, actúan los operadores aritméticos. 


EJEMPLO: 


Determinar si 2 + 5 es menor que (15 + 4) /20250 


SOLUCION: 


Es evidente que, sin efectuar las operaciones aritméticas que determinan el valor de cada 
expresión, es difícil responder a la proposición anterior. 

Las cadenas de caracteres pueden sef comparadas con estos mismos operadores. Para ha- 
cerlo se cotejan, carácter a carácter, ambas cadenas valorando cada carácter de acuerdo con 
su código ASCII. Más adelante se estudiará todo lo referente a los códigos, baste por ahora 
saber que cada carácter tiene su propio valor. 
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- OPERADORES LOGICOS 


Responden directamente a las funciones lógicas del álgebra de BOOLE. 


Los operadores lógicos actúan entre operandos en los que, a su vez, intervienen operado- 
res de relación. Esto quiere decir que los operandos de los operadores lógicos tendrán siem- 
pre el valor 1 (CIERTO) ó f (FALSO), y, por consiguiente, los operadores lógicos sólo res- 
ponden 1 ó Y (CIERTO o FALSO). 


Lós operadores lógicos, según su orden de prioridad, son NOT, AND y OR, que estudia- 
remos con detalle más adelante. 


Ver apéndice FUNCIONES LOGICAS APLICADAS. 


OPERADORES FUNCIONALES 


Estos son algoritmos que residen en el propio sistema y operan sobre datos suministrados 
al computador por medio del teclado o el programa, obteniendose como resultado un valor. 


Las funciones de este tipo pueden ser numéricas, alfanuméricas y operativas. 
En el ESQUEMA DE COMANDOS BASIC se puede ver el conjunto de estos operadores. 
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2-7 TECLEANDO UN PROGRAMA 


Al estudiar la estructura de una línea de programa, vimos que el cuarto campo está dedi- 
cado a indicar al computador el FIN DE LINEA. Esto quiere decir que, una vez tecleada la 
línea completa, debemos apretar ENTER para ordenar a la máquina que la memorice, cosa 
que hará si no hay ningún error de sintaxis. 


Supongamos que la línea que vamos a introducir es: 1520 INPUT AS 


En primer lugar, teclearemos el número de línea: 152f; a continuación, el comando 
INPUT, y, finalmente, los caracteres A y $. Con todo esto la línea habrá concluido y sólo 
faltará indicar al computador que la pase a su memoria, para lo cual apretaremos la tecla 
ENTER, 


Todos los computadores tienen un símbolo —normalmente >— para indicar la última 
línea memorizada, que se sitúa automáticamente entre el número de línea y la sentencia. 
Este indicador se llama puntero. 


Si la línea no es aceptada por el ordenador debido a algún tipo de error, deberemos 
proceder a corregirlo. 


En primer lugar, debemos observar que, en la zona de la pantalla donde van apareciendo 
los diferentes caracteres a medida que se teclean, un cursor se va desplazando y queda siem- 
pre a la derecha del último carácter tecleado. 


Este cursor está representado por diferentes símbolos. Todo lo referente a este tema se 
estudia en el Apéndice A. 

El cursor intermitente indica dónde está situado, y la forma en que queda representado 
en la pantalla no importa tanto como el hecho de saberlo desplazar, voluntariamente, a 
derecha e izquierda a lo largo de la línea que estemos manipulando. 


Tanto el puntero como el cursor se desplazan mediante las teclas donde figuran las “fle- 
chas” (+ y + >) que indican el sentido deseado. En el “plus” basta con apretar dichas teclas 
y en el “convencional” hay que apretar además CAPS SHIFT. 


Visto esto, hay que desplazar el cursor justo a la derecha del carácter equivocado y bo- 
rrarlo apretando la tecla DELETE. 


Supongamos que en la línea 10 INPUT AS 


queremos sustituir A por B. Una vez situado el cursor a la derecha de A, hay que apretar la 
tecla DELETE — o CAPS SHIFT y DELETE en el “convencional”—, con lo que se borra- 
rá A y sólo restará escribir B en su lugar. 


Hay que destacar que no hay nada que impida, una vez posicionado el cursor en el lugar 
adecuado, insertar nuevos elementos en la línea. 


Todos estos detalles se verán con más claridad a medida que avancemos en la lectura de 
esta sección. Sin embargo, podemos anticipar que, si la línea de programa que queremos 
corregir está ya memorizada por el computador, podemos manipularla de acuerdo con las 
indicaciones que, para tal fin, existen. Este proceso se llama “editar la línea”. 
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ESQUEMA DE COMANDOS BASIC 


Operadores aritméticos: ?, *, /, +, —=,( ) 
Operadores de relación: =, <,>, <>, <=, >= 
Operadores lógicos: NOT, AND, OR 


Operativos: ATTR, IN, PEEK, OUT, POKE 


CHR$, CODE o ASC, INKEYS, 
Operadores funcionales: Alfanuméricos: | LEN, STR$, VAL, VALS, 
ABS, ACS, ASN, ATN 


COS, EXP, INT, LN ó LOG, 
Numéricos: RND, SGN, SIN, SQR, 
TAN 


BEEP, BORDER, BRIGHT, CIRCLE, 
CLEAR, CLS, CONTINUE, COPY, 
DRAW, FLASH, INK, INVERSE, 

Auxiliares LIST, LLIST, LOAD, LPRINT, 
MERGE, NEW, OVER, PAPER, PAUSE, 
PLOT, PRINT, REM, RUN, SAVE, 
STOP, VERIFY 


DATA, DEF EN, DIM, INPUT, LET, 


De asignación RANDOMIZE, READ, RESTORE 


Sentencias: 


GO SUB, GO TO, RETURN 


De bifurcación 
incondicional: 


De selección: IF/THEM 


eS FOR ... TO/NEXT, 
De repetición: | FOR ... TO ... STEP/NEXT 


NOTA: Los comandos en cursiva se explican detalladamente en la Sección III. 
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2-9 CONFIGURACION DE LOS CAPITULOS 


Cada ficha responde a la siguiente estructura: 


COMANDO SINTAXIS SIGNIFICADO 


INTERPRETACION Explica el uso general de la palabra. 


POSIBILIDADES Explica las diferentes posibilidades de utilización. 


FORMA de teclear la instrucción: 


EJEMPLOS Para aclarar el campo de utilización. 


! 


Para situar los comandos ver APENDICE A, “CROQUIS DE ACCESO RAPIDO A LOS 
COMANDOS”. 
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, á ABS (expresión numérica) 


INTERPRETACION: 


Se obtiene el valor absoluto de la expresión numérica. 


POSIBILIDADES: 


La expresión numérica puede ser un número o una expresión numérica que, como 
ya es sabido, finalmente es un número. 


EJEMPLO: 
PROGRAMA COMENTARIOS 
PRINT ABS (-5) Si tecleamos esta instrucción y apretamos ENTER 


obtenemos el valor absoluto de —5, que es 5. 


Cuando se teclea una instrucción sin línea de programa, esperando respuesta inme- 
diata del ordenador, estamos trabajando en modo directo. 


EJEMPLO: 

PROGRAMA COMENTARIOS 
10 LETa=25 En este caso, la respuesta del ordenador será 250. 
20 LETb= 10 


30) PRINT ABS (25 * 10) 
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¿ CHR$ (expresión numérica) 


INTERPRETACION: 


Se obtiene el carácter cuyo código es la expresión numérica indicada. 


POSIBILIDADES: 


Los valores a asignar en la expresión numérica deben estar comprendidos entre ( y 
255, ambos inclusive, que corresponden al código ASCII de caracteres. 


FORMA de teclear la instrucción: Apretar U en modo E 


EJEMPLO: 


CHR$ 65 corresponde al carácter A. Para comprobarlo, basta teclear PRINT CHR$ 
65 seguido de ENTER. 
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CODE (expresión alfanumérica) 


INTERPRETACION: 


Se obtiene el código ASCII del primer carácter de la expresión alfanumérica. 


POSIBILIDADES: 


Es la función inversa de CHRS$. 


CODE “Angel” nos retornará 65, que es el código de A, primer carácter de la expre- 
sión alfanumérica “Angel”. Para comprobarlo, basta teclear PRINT CODE “Angel” se- 
guido de ENTER. 
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INTERPRETACION: 


Copia en papel — mediante impresora— el contenido exacto de la pantalla. 


| POSIBILIDADES: | 


COPY 


| FORMA de teclear la instrucción: Apretar Zen modo K | 
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INTERPRETACION: 


Se obtiene el valor del coseno de la expresión numérica, dado el ángulo en radianes. 


POSIBILIDADES: 


Las que se derivan del cálculo trigonométrico. 


EJEMPLO: 


| FORMA de teclear la instrucción: Apretar W en modo E | 


Escribir el programa. que, al ejecutarlo, imprima en pantalla el valor de los cosenos 
de los ángulos de 0,5 en 0,5 radianes, entre 0 y 2 7. 


SOLUCION: 
PROGRAMA COMENTARIOS 
1f FOR X = Y TO 2 * PI STEP 0.5 Si el computador en uso dispone de otras funcio- 
nes trigonométricas, los criterios de utilización de 
20) PRINT COS X las mismas serán similares a los expuestos hasta 


aquí. 
3 NEXT X 
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INTERPRETACION: 


Con esta sentencia se almacenan valores —numéricos o alfanuméricos— a los cuales 
accede el programa secuencialmente, gracias a la sentencia READ, que estudiaremos des- 
pués. 


POSIBILIDADES: 


Cada constante, dentro de la sentencia DATA, debe ir separada de la siguiente por una 
coma, y las constantes alfanuméricas deben escribirse entre comillas. 


Las sentencias DATA son interpretadas por el BASIC como almacén de datos y, consi- 
guientemente, no implican ningún tipo de operación al ser leídas. Esto quiere decir que 
las sentencias DATA se pueden colocar en cualquier parte del programa, sin que afecte al 
desarrollo del mismo; no obstante, es aconsejable colocar todos los DATA en un mismo 
sector del programa. 


Un DATA puede contener tantas constantes como requiera el programador, y un pro- 
grama puede tener tantos DATA como sean necesarios. 


La sentencia DATA, para que sea operativa, necesita de la sentencia READ. 


FORMA de teclear la instrucción: READ: Apretar A en modo E 


DATA: Apreter D en modo E 


EJEMPLO: 


Almacene en la línea de programa 1000 los nombres de cinco capitales europeas. 


SOLUCION: 
1000 DATA “Madrid”, “París”, “Londres”, “Roma”, “Dublín”. 
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INTERPRETACION: 


Con estas sentencias se leen, secuencialmente, las constantes almacenadas en las sen- 
tencias DATA, asignando estos valores —uno tras otro— a las variables. Estas variables 
van separadas por comas. 


POSIBILIDADES: 


Cuando la lectura de un programa llega a una sentencia READ, lee la primera constan- 
te aún no leída de todos los valores almacenados en todas las sentencias DATA del progra- 
ma, asignando dicho valor a la variable correspondiente. 


Las variables deben ser del mismo tipo —numéricas o alfanuméricas— que las constan- 
tes que lee de los DATA. En caso contrario, un mensaje de error avisará de la anomalía. 


Una sentencia READ puede acceder a uno o varios DATA, o varios READ a un solo 
DATA, pero siempre secuencialmente. 


Si la cantidad de variables situada tras una sentencia READ es mayor que el total de 
constantes, saldrá en la pantalla un mensaje de error advirtiendo que no hay suficientes 
constantes. Este mensaje suele ser OUT OF DATA, indicando a continuación el corres- 
pondiente número de línea. 


Si hay más constantes en las sentencias DATA que variables en las sentencias READ, 
el excedente de constantes queda guardado hasta que otras sentencias READ obliguen a 
utilizarlo. Es decir, las variables de la siguiente sentencia READ tomarán los valores aún 
no leídos del total de las constantes de las sentencias DATA. 


Para comenzar a leer las constantes desde el primer DATA hay que usar la sentencia 
RESTORE, como veremos posteriormente. 


1. Escriba el programa, que una vez ejecutado, imprima en pantalla las cinco ciudades 
europeas del ejemplo anterior. 
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SOLUCION 1: 


PROGRAMA COMENTARIOS 
10 READ AS, BS, CS, DS, ES En la línea 10 damos valores a las variables indica- 


das, extrayéndolas secuencialmente del DATA de 
la línea 1000. 
2 PRINT AS, BS, CS, DS, ES En la línea 20) se ordena su impresión. 


1000 DATA “Madrid”, “París”, 
“Londres”, “Roma”, “Dublín” 


SOLUCION 2: 

PROGRAMA COMENTARIOS 
1f FOR X=1TO5 En esta ocasión, una sola variable V$ va tomando 
20 READ VS sucesivamente los valores contenidos en los DATA. 
3 PRINT VS 
4 NEXT X 


1000 DATA “Madrid”, “París” 
1910 DATA “Londres”, “Roma”, 
“Dublín” 


EJEMPLO: 


2. Escriba el programa que, una vez ejecutado, imprima en pantalla el nombre de cin- 
co alumnos y sus calificaciones. 


SOLUCION: 

PROGRAMA COMENTARIOS 
10 FOR X = 1 TO 5 Observe cómo la secuencia de lectura de los 
20 READ VS: PRINT VS READ exige que los valores de los DATA sean, 
3 READ V: PRINT V alternativamente, alfanuméricos y numéricos. 
4 NEXT X 


100 DATA “JUAN”, 5, “José”, 
6, “Ricardo”, 4, “Luis”, 
8, “Tomás”, 9. 


EJEMPLO: 


3. Escriba el programa que, una vez ejecutado, imprima en pantalla la suma de los nú- 
meros pares y la suma de los números impares menores que 1/. 


SOLUCION: 
PROGRAMA COMENTARIOS 
109 DATA 2, 4,6,8,1,3,5,7,09, Las sentencias READ de las líneas 20, 30 y 50 
“pares < 10”, “impares < 10” van tomando los valores que hay en la sentencia 
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PROGRAMA 
2 READ A, B,C,D 
3 READ E, F, G,H, I 
40 LETS=A+B+C+D 
SQ LETT=E+F+G+H+I 


60 READ AS, BS 
70) PRINT “La suma de los nú- 
meros ”;AS$;” es ”;8S;” y 


la suma de los números ””; 
BS; ” es **T 


COMENTARIOS 


DATA de la línea 10. 

Observe que las variables A$ y B$ de la línea 60, 
que son alfanuméricas, toman los valores escritos 
entre comillas en la línea 10. 

Recuerde: No hay problema cuando hay más 
constantes que variables. Las constantes que so- 
bran quedan a la espera de que otra u otras sen- 
tencias READ los ordene leer. 
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DEF FN variable = expresión 


INTERPRETACION: 


Con esta instrucción, el usuario del ordenador puede definir sus propias funciones, si- 
guiendo las reglas que se explican a continuación y de forma análoga al proceso mental 
matemático de decir: “La función y de x — y (x) —es igual a tal expresión?” 


POSIBILIDADES: 


Las funciones numéricas se reconocen y se denominan mediante instrucciones FN 
seguidas de una sola letra. Por ejemplo, DEF FN A. 


EJEMPLO: 


Para definir una función en BASIC se debe proceder de una forma similar a ésta: 


FORMA de teclear la instrucción: Apretar 1 SYMBOL SHIFT en modo E 


19 DEF FN A (x)=x+x*2 
La función aquí definida nos dice que, para un valor de x, la función A (x) es igual 


a la expresión indicada. Dicho esto, cabe preguntarse cómo se dan valores a la variable 
X. Lo veremos a continuación al tratar el comando FN. 


En el caso de expresiones alfanuméricas podría ser, por ejemplo: 
10) DEF EN AS (BS) = BS (3 TO 10) 


Aquí se define una cadena de caracteres (A$) en función de otra (B$). 
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DIM. nombre de la matriz (definición de elementos ) 


INTERPRETACION: 


Una matriz en BASIC debe ser concebida como un archivo clasificado de elementos. 
Estos elementos pueden ser números o caracteres. 


Con la sentencia DIM se dimensiona una matriz denominada “nombre de la matriz” y 
organizada según las especificaciones dadas en la definición de elementos, reservándose la 
memoria suficiente para almacenar todos sus elementos. Es decir, se establecen las dimen- 
siones de esa matriz. 


POSIBILIDADES: 


El nombre de la matriz sólo puede ser una letra y la definición de elementos incluye 
diferentes conceptos, según el tipo de matriz que se pretenda dimensionar. Estos tipos 
dependerán de la clase de elementos —números o caracteres— y de la organización de los 
elementos dentro de la matriz. 


En una misma matriz sólo puede haber elementos numéricos o, por el contrario, alfa- 
numéricos. 


DIM debe ser introducida en el programa antes de pretender utilizar las posibilidades 
que ofrecen las matrices en BASIC y que estudiamos a continuación. 


Para el dimensionado de matrices alfanuméricas —de caracteres—, el nombre de la ma- 
triz debe ser una letra seguida del símbolo $. A las matrices numéricas les basta simple- 
mente con la letra. 


Los elementos de una matriz pueden organizarse según una sola dimensión —secuencia 
lineal de elementos— o multidimensionalmente, distribuyéndolos en filas y columnas e, 
incluso, más allá como tendremos oportunidad de ver. 


Los elementos de cualquier matriz en BASIC son, a todos los efectos, variables cuyo 
nombre genérico es el mismo para todos y coincide con el nombre de la matriz, distin- 
guiéndose unos de otros por la posición que ocupan dentro de ella. 


En el momento de dimensionar una matriz —aplicando la sentencia DIM—, todos los 
elementos de la misma son f. O, dicho de otro modo, las variables que conforman la ma- 
triz contienen el valor (. 


A los elementos de una matriz, también se les conoce por variables con subíndice, 
siendo el subíndice el indicador de la posición que ocupan en ella. 


Las variables con subíndice pueden manipularse en un programa de la misma forma, 
y sin ninguna restricción, en que han sido utilizadas las variables en general a lo largo de 
todo este libro. 


Vistos estos conceptos generales, pasemos a unos ejemplos para precisar las ideas. 


En este sentido es conveniente aclarar que los ejemplos que se plantean a continua- 
ción parten del supuesto de la necesidad de utilizar matrices y, consiguientemente, la apli- 
cación de las mismas es inmediata. De aquí podrá el lector sacar conclusiones de tipo ope- 
rativo que le son imprescindibles, pero —y esto es lo más importante— para usar las matri- 
ces en BASIC de una forma eficiente, el programador debe plantearse con claridad el 
porqué de la matriz que piensa definir. 
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FORMA de teclear la instrucción: Apretar D en modo K 


Teclear DIM, el nombre de la matriz y la definición de los elementos separados por co- 
mas y entre paréntesis, seguido de ENTER. 


Introducción al planteamiento de matrices numéricas. 


Supongamos que es de nuestro interes tener controladas las notas obtenidas por los 
alumnos de tres centros escolares con cinco cursos de diez alumnos cada centro y, de mo- 
mento, no es necesario conocer sus nombres, sino sólo sus notas para llegar a conclusiones 
de tipo estadístico. 


En primer lugar, asociaremos uno de los centros al número 1; dentro de ese centro va- 
mos a denominar 1 también al primer curso, 2 al segundo, 3 al tercero, 4 al cuarto y 5 al 
quinto, y, dentro de cada curso, volvemos a dar al número 1 el significado de primer 
alumno, al 2 el de segundo alumno, y así, sucesivamente, hasta llegar al décimo con el 
número 10. 


Todo esto lo habremos hecho con la intención de poder saber que, si nos encontramos 
con una información del tipo (1, 4, 8), estamos refiriéndonos al primer centro, cuarto 
curso y octavo alumno. 


Con el mismo criterio (2, 1, 2) significará que es el segundo centro del primer curso 
del segundo alumno. Y un (3, 2, 10) vendrá a decirnos que estamos en el tercer centro, 
segundo curso, décimo alumno. 


Gracias a este planteamiento, hemos estructurado los subíndices de nuestra futura 
matriz de forma que signifique algo congruente para el programador. 


Razonamientos de este tipo intuitivo o altamente reflexionado, según la complejidad 
del asunto, deben ser seguidos para que la organización de los elementos dentro de la 
matriz responda al criterio de eficacia que se debe exigir. 


Bien, una vez en este punto, es relativamente fácil llegar a hacer operativa una matriz. 


Comenzaremos por dimensionar la matriz, para la cual debemos darle al ordenador 
datos que la ponderen. Así, en nuestro ejemplo, con DIM N estamos ordenando al compu- 
tador que dimensione una matriz numérica cuyo nombre sea N, pero ahora necesita saber 
cuántos elementos la van a componer y cómo van a estar distribuidos. 


La instrucción completa será DIM N (3, 5, 10) —3 centros, 5 cursos por centro, 10 
alumnos por curso—, la cual, una vez ejecutada, habrá originado en el computador la crea- 
ción de 150 variables, cuyo contenido inicial es Y, de nombre N y con subíndices que van 
desde (1, 1, 1) hasta (3, 5, 10). 


De ahora en adelante, para referirnos a un elemento cualquiera de esta matriz, lo hare- 
mos mediante la expresión N (C, R, A), de forma que esta notación viene a decir nota del 
alumno A, del curso R, del centro C. 


De forma explícita, las variables de las que disponemos en memoria son: 


38 NG, 11. N(, 1,2 N(1139 Na, 1,4 NL LS NEL, 1,6) 

38 [N(1,1,7) N(1,1,8) N(1,1,9) N(1, 1, 10) 

82 IN(1,2, 1) N(1,2,2) N (1, 2, 3) N (1,2,5) ..... N (1, 2, 10) 
$5 ES BE AO Os, 11 e a Js. JN PS A A A N (1, 3, 10) 
SE INATEC) NA SL ea calas EN N (1, 4, 10) 
1 0d O Dto E REA O E A A N (1, 5, 10) 
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$2 

Sa IND NE LANE cra daa po gas N (2,1, 10) 
ELN A A) ANA LS N (2, 2, 10) 
AN NO 2 ties N (2, 3, 10) 
ED NOD NO: 67 NO 4d coracoesor tancias saido N (2, 4, 10) 
A A N (2, 5, 10) 
E E A N (3, 1, 10) 
ANA IN NI a dni o N (3, 2, 10) 
E E A e e E N (3, 3, 10) 
AN CEN LE E A N (3, 4, 10) 
A CAINE E e A N (3, 5, 10) 
¡Sr! 


Hemos acordado que cualquiera de estas variables está representada por N(C,R, A), 
lo cual significa que, si hacemos C= 1,R = 2 y A = 4, nos estamos refiriendo a la variable 
N (1, 2, 4), que figura recuadrada en el esquema anterior y cuyo contenido inicial es f. 


Ahora ya somos conscientes de lo que significa la primera línea de nuestro programa: 
10 DIM N (3, 5, 10) 


En lo que sigue, haremos operativa esta matriz numérica. 


Si quisiéramos darle un valor determinado a un elemento cualquiera de esta matriz, 
podríamos escribir, por ejemplo, 


LET N (1, 2, 4)=7.5 
Pero esta forma de dar valor a las variables de una matriz no suele ser práctica, y, en 


este caso, no lo es de ningún modo desde el punto de vista del ejemplo propuesto. Resulta 
más conveniente diseñar un programa que responda a este diagrama: 


PRINCIPIO 


Dimensionar 
la matriz N 


R = curso (máximo 5) 


C = centro (máximo 3) 
A = alumno (máximo 10) 


Por teclado: 
entra C 
entra R 
entra A El usuario fija 

valores a las variables 


Por teclado: 
entra nota (V) 


Se asigna nota 
a 
-N(C,R, A) 


Se valoran los elementos 
de la matriz N 


¿más 
notas? 
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Un programa con este tipo de diseño no debe ser ejecutado con RUN/ENTER, 
ya que pondría a f) el contenido de las variables. Es mejor correrlo con GO TO a 


la línea siguiente a aquélla donde se dimensiona la matriz. 


Un listado que corresponda a la idea anterior puede ser: 


PROGRAMA COMENTARIOS 
10 DIM N (3, 5, 10) Estudie primero y teclee después este programa. 
2) INPUT “Centro 1,2 6 3?”; C Ejecútelo y dé los valores que quiera a C, R, 


3) INPUT “Curso 1,2,3,465?”¡R  AyV. 

4() INPUT “Alumno del 1 al 18?”;¡A Si suponemos que C =1,R=3,A=5SyV=6, 
5 INPUT “Nota?”; V con el comando directo PRINT N (1, 3, 5), obten- 
60 LETN(C,R,A)=V dremos un 6 en la pantalla. 

7 INPUT “Más notas? (S/N)”; R$ Recuerde que este programa debe ejecutarlo con 
8() IF RS =“S” THEN GO TO 20 GO TO 9, línea anterior a la que dimensiona la 
9 STOP matriz. 


Cuando ejecute este programa y haga sus pruebas, seguramente notará que, si bien la 
matriz se rellena a medida que da valores a C, R, A y V —cosa que puede comprobar con 
el comando directo PRINT seguido de cualquier elemento de la matriz—, no es útil en nin- 
gún otro sentido. 


Avancemos un poco más con el análisis de los siguientes diagramas: 


PRINCIPIO 


MENU EN Introducir notas SANS 1 
PANTALLA Notas Medid tea no dsd 
Borrado total de notas ....... 3 
ELN a A a 4 


Entra por teclado 
de id e Po Ó nas? 


Tecla 
desconocida 
PAUSA 


Nota: Al ser utilizado por primera vez 


este programa debe pulsarse la tecla 3 
para dimensionar la matriz. 
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SUBRUTINA NOTAS 


Por teclado: 
entra C 


COMENTARIOS 


El programa principal, gracias al menú, dirige 
la secuencia de lectura a una de las tres subrutinas, 
en función de las necesidades o los deseos del usua- 


entra R 
entra A 


rio del programa. 


Por teclado 
entra nota 
V 


Se asigna V (nota). 


nota a 
N (C,R, A) 


centro C. 


¿más 
notas? 


Vueltz al 
programa 
_ principal 


SUBRUTINA NOTAS MEDIAS 


Nota media por centro ..... 1 
Nota media por curso ......2 
Vuelta MENU PRINCIPAL .. 3 


MENU EN 
PANTALLA 


2 elementos con 
subíndice 
C dado por teclado 


2 elementos con 
subíndice 
R dado por teclado 


Vuelta 
programa 
principal 


Tecla 
desconocida 
PAUSA 


Por teclado, entran los valores de las variables C 
(centro), R (curso) y A (alumno). 


También por teclado, entra el valor de la variable 


Se asigna la nota V al alumno A del curso R del 


El bucle permite repetir el proceso anterior hasta 
que se hayan asignado valores a todas las variables 
o se decida volver al programa principal. 


COMENTARIOS 


Gracias al menú, el 
usuario del progra- 
ma puede obtener la 
nota media por cen- 
tro o por curso, o 
volver al programa 
principal. 


Indica la suma de n 
elementos con sub- 
índice C O R -—in- 
troducidos por tecla- 
do— dividida por n 
para obtener la nota 
media. 
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SUBRUTINA BORRADO 
CONFIRMAR 
DECISION 


SI 
Dimensionar 
otra vez 
BORRADO 
PAUSA 


Vuelta 


programa 
principal 


COMENTARIOS 


Mediante esta subrutina, se confirma la 


Apretar decisión del usuario de borrar los valo- 
OK res de las variables o de volver al progra- 
para seguir Ma principal. 


Un programa que responda a las características de los diagramas anteriores puede ser 
el siguiente: 


PROGRAMA 

REM TO ICHA:" 
PRINT "1 para 
PRINT "2 para 
PRINT "3 para 
PRINT "3 para 
INPUT R% 
IF R$="1” THEN 
IF R$="2" THEN 
1IF R$="3" THEN 
IF R$="4" THEN 
CLS 


COMENTARIOS 


Para una mejor presentación del menú 
y del uso de PRINT en general, vea la 


Sección III 


Dim ” 
introducir notas.” 
notas medias.” 
borrado total, o en la primera utilizacion.” 
finalizar el trabajo." 


GO SUB 200 

GO SUB 300 

GO SUB 700: 60 TO 10 
STOP 


PRINT "TECLA DESCONOCIDA” 
FOR X=0 TO 100: NEXT X 


CLS 
GO TO 10 


REM "NOTAS” 
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200 CLS 

210 INPUT "Centro: ”";¿C€ 

220 INPUT "Curso:z "¿R 

230 INPUT "Alumno?: "A 

240 INPUT "Nota?z "3V 

250 LET N(C,R,A)=V 

2650 INPUT "Mas notas? (S/N): ";R% 

270 1F R$="S” OR R$="s" THEN GO TO 210 


280 RETURN 
300 REM "NOTAS MEDIAS" 
310 CLS 


320 PRINT "1 Para nota media por centro.” 

325 PRINT "2 para nota media por curso.” 

330 PRINT "3 para volver al menu principal." 

340 INPUT R% 

350 IF R$="1" THEN GO TO 420 

360 IF R$="2" THEN GO TO 540 

370 IF R$="3" THEN RETURN 

380 CLS 

390 PRINT "TECLA DESCONOCIDA” 

400 FOR X=0 TO 100: NEXT X 

410 GO TO 310 

420 INPUT "Centro a analizar?: ";,C 

430 LET Z=0 

440 FOR R=1 TO 5 

450 FOR A=1 TO 10 

460 LET S=N(C,¿R,A) 

470 LET Z=Z+S 

480 NEXT A 

490 NEXT R 

500 PRINT ?” "La nota media del centro: ”"”"C;3"” es "3Z/50 

510 INPUT "Otra consulta? (S/N): ";R% 

520 IF R$="S" OR R$="s” THEN GO TO 310 

530 RETURN 

540 INPUT "Curso a analizar?: "¿R 

550 LET Z=0 

560 FOR C=1 TO 3 

570 FOR A=1 TO 10 

580 LET S=N(C,R,A) 

5790 LET Z=Z+S 

600 NEXT A 

610 NEXT € 

620 PRINT ?”* "La nota media de los cursos: "”"R3" es "3Z/30 

630 GO TO 510 

700 REM "BORRADO Y PRIMERA VEZ" 

710 CLS 

720 PRINT " Esta opcion del menu solo debeusarla cuando se 
utiliza ” 

723 PRINT "el pro-grama por primera vez, O paraborrar tod 
as las notas.” 
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730 INPUT "Si lo confirma teclee 0O.K.:z "¿R%$ 
7540 1F R$<>"0D.K.” THEN CLS : 60 TO 10 


750 DIM n(3,5,10) 


760 PRINT "Matriz inicializada” 
770 FOR X=0 TO 10: NEXT X 
780 CELS : RETURN 


En la línea 12M) se ha generado un bucle de retardo que durará más cuanto mayor sea 
el valor final de X. 


Introducción al planteamiento de matrices alfanuméricas. 


En esta ocasión vamos a suponer que nos interesa conocer los nombres de los alumnos 
de los tres centros anteriores. 


Antes de entrar propiamente en la resolución de este ejemplo, es conveniente conocer 
las peculiaridades de las matrices de caracteres de forma paulatina. 


De momento, vamos a centrarnos en colocar dentro de una matriz de caracteres los 
nombres de los alumnos de un curso de un solo centro. Supongamos que sus nombres 
son: Juan, Luis, Francisco, Angel, Miguel, Tomás, Federico, Félix, José y Andrés. 


Como vemos, son diez cadenas de caracteres que tienen: 


4 caracteres la primera: “Juan” 

4 caracteres la segunda: “Luis” 

9 caracteres la tercera: “Francisco” 
5 caracteres la cuarta: “Angel” 

6 caracteres la quinta: “Miguel” 

5 caracteres la sexta: “Tomás” 

8 caracteres la séptima: “Federico” 
5 caracteres la octava: “Félix” 

4 caracteres la novena: “José” 

6 caracteres la décima: “Andrés” 


Comparando la longitud de todas ellas, llegamos a la conclusión evidente que la cade- 
na más larga es la tercera, “Francisco”, que tiene 9 caracteres. 


Así, pues, tenemos 10 cadenas a guardar en una matriz y la longitud de la mayor es 
de 9 caracteres. Estos son dos datos necesarios para dimensionar esa matriz. Es decir, si a 
lo largo del listado de un programa nos encontramos, por ejemplo, con: 


... DIM NS (10 , 9) 


debemos interpretar que se dimensiona una matriz alfanumérica, denominada N$, capaz 
de contener 10 cadenas de hasta 9 caracteres cada una. 


Cuando se dimensiona una matriz alfanumérica, se reserva en memoria un espacio 
para tantos caracteres como resulten de multiplicar el número de cadenas por el número 
de caracteres que —como máximo— vayan a conformarlas, e, inicialmente, su contenido 
son espacios en blanco. 
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Para ver esto con claridad, consideremos A cadenas de L letras o caracteres en general 
y dimensionemos la matriz adecuada: 


En el momento de ejecutarse esta sentencia, se guardan A * L espacios. Esto quiere 
decir que, si tecleamos, por ejemplo, PRINT N$ (n) —siendo n mayor o igual que 1 y 
menor o igual que A— en pantalla no aparecería nada, que es justamente lo que se espera 
de un espacio. Pero si el comando fuera PRINT CODE NS (n), obtendríamos 32, que es el 
código ASCII del espacio. 


Con esto, venimos a comprobar que, mientras las matrices numéricas contienen ceros 
inicialmente, las matrices alfanuméricas contienen inicialmente espacios. 


Si en una matriz se dimensiona DIM NS (A, L), se introduce una cadena de longitud 
menor que L, entonces, los caracteres sobrantes se mantienen en espacios. 


Si Les mayor que la longitud de la cadena, se ignoran los caracteres sobrantes. 


Volvamos al caso del curso de diez alumnos cuyos nombres conocemos y cabe pre- 
guntarse: ¿Cómo se rellena la matriz alfanumérica una vez diseñada? 


Podemos seguir un proceso similar al de las matrices numéricas. Veamos el siguiente 
listado: 


PROGRAMA COMENTARIOS 
10 DIM NS (10, 9) Dimensionamos la matriz N$ de 10 cadenas de 
hasta 9 caracteres. 
2) INPUT “Número del Se pide número de referencia del alumno que 
alumno? ”; A corresponderá a su posición en la matriz. Por 
tanto, debe ser1= <A =< 10. 
3 INPUT “Nombre? ”; LS Los caracteres del nombre deben ser 1 =< L= 
<o9, 
4 LET NS (A) = LS A tendrá el valor numérico dado en 20, y L$ será 
la cadena definida en 30. 
5 INPUT “Otro nombre? Con las líneas 5Q, 60) y 7) establecemos las condi- 
(S/N) ”; RS ciones para repetir el bucle si hay más nombres 


para introducir en la matriz. 
60) IF RS = ““S” THEN GO TO 20 


79 STOP 


Al ejecutar este programa y dar a A los valores 1, 2, 3,... 10 y a L$ los nombres de los 
diez alumnos citados (Juan, Luis, etc.), se conseguirá rellenar la matriz N$ de acuerdo con 
nuestros deseos. Para comprobarlo, basta ejecutar un comando directo del tipo PRINT 
N$ (2)/ENTER y obtendremos en pantalla Luis. Haga otras pruebas. 


Nuestro siguiente paso será controlar los cinco cursos de un centro. Para ello, bastará 
con dimensionar la matriz de la línea 10 de la siguiente forma:; 


en el supuesto de que no haya ningún alumno cuyo nombre tenga más de 9 caracteres en 
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ninguno de los 5 cursos. Con que sólo existiera uno cuyo nombre tuviese, por ejemplo, 
12 caracteres, tendríamos que modificar la anterior matriz de la siguiente forma: 


. - DIM NS (5, 10, 12) 
claro está, a no ser que no tuviera ninguna importancia perder los tres últimos caracteres 


en Cuestión. 


Con la instrucción de la línea 10, el ordenador ha reservado en la memoria espacio para 
5*10*9 caracteres y, todos ellos, están inicialmente ocupados por espacios. 


Un programa adaptado a la nueva situación puede ser: 


PROGRAMA COMENTARIOS 

10 DIM NS (5, 10, 9) Dimensiona 5 grupos de 10 cadenas de 9 carac- 
teres cada una. 

2) INPUT “Curso? ”; R lI=<R=<5 

3() INPUT “Número del 1=<A=<10 

alumno? ”; A 
4() INPUT “Nombre? ”; LS 1 = < LEN L$ =< 9 
5 LET NS (R, A) = LS R tendrá el valor numérico dado en 20, y A el da- 


do en 30; LS está definida en 40. 
6) INPUT “Otro nombre? 


(S/N) ”; RS 
74 IF RS = “S” THEN GO TO 20 
80 STOP 


Ahora estudiamos el caso completo de los tres centros con cinco cursos cada uno de 
diez alumnos. 


La forma de dimensionar la matriz parece evidente en función de lo expuesto hasta 
aquí. Se trata de tres grupos formados por cinco subgrupos cada uno que tienen diez 
cadenas de nueve caracteres cada una. Todo ello corresponde a la siguiente instrucción: 


. - DIM NS (3,5, 10, 9) 


que nos llevaría al siguiente programa: 


PROGRAMA COMENTARIOS 
10 DIM NS (3,5, 10, 9) Dimensionado de la matriz N$ según lo comen- 
tado. 
2) INPUT “Centro? ”; C 1=<C=<3 
3) INPUT “Curso? ”;R 1=<R=<5 
4() INPUT “Número del 1=<A=<10 
alumno? ”; A 
5( INPUT “Nombre? ”; LS 1 =< LEN L$ =< 9 
6 LET NS (C, R, A) = LS C tendrá el valor numérico dado en 20; R el dado 


en 30, y A el dado en 40; LS está definida en 50. 
7 INPUT “Otro nombre? 


(S/N) ”; RS 
80 IF R$ = “S” THEN GO TO 20 
9 STOP 
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Una vez tecleado y ejecutado este programa, damos valores a todas las variables de la 
matriz hasta rellenar las 3 * 5 * 10 cadenas. 


Una vez hecho esto, supongamos que queremos saber el nombre del alumno cuya 
referencia (matrícula, por ejemplo) es 10, del curso 4 del centro 2. Para ello, podríamos 
emplear el comando directo PRINT NS$ (2, 4, 10) y obtendríamos en pantalla el nombre 
deseado. 

Esta forma de averiguar el contenido de los diferentes elementos de la matriz no es 
muy práctica. Por esta razón, sugerimos al lector el ejercicio de completar el anterior lis- 
tado de forma parecida a lo establecido en los diagramas de las matrices numéricas, basa- 
dos en menús presentados en pantalla, de los cuales damos una sugerencia en el siguiente 
esquema: 


para la primera utilización 
o el borrado total 


para introducir nombres 


para consultas 


para finalizar el trabajo 


El lector debe observar que un listado que contenga una combinación adecuada de las 
instrucciones dadas en el último ejemplo de las matrices numéricas y del que se deriva el 
comentario anterior, le puede llevar a obtener resultados en los que se unan el nombre del 
alumno y su nota, utilizando 


PRINT N (C, R, A) y PRINT NS (C, R, A) 


Este tema, por sí mismo, abriría la posibilidad de una nueva publicación delicada a los 
ficheros en BASIC, que se sale de los límites que nos hemos propuesto en la presente. 
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> EXP (expresión numérica) 7 


INTERPRETACION: 


Se obtiene el valor del número e elevado a la potencia representada por la expresión 
numérica. 


FORMA de teclear la instrucción: Apretar X en modo E 


EJEMPLO: 


Elevar el número e a la segunda potencia. 


SOLUCION: 
Teclee PRINT EXP (2) y pulse ENTER. La pantalla le mostrará el resultado. 
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INTERPRETACION: 


Esta instrucción es el complemento imprescindible de la DEF FN, ya que con ella se 
calcula la función definida de acuerdo con el valor dado a la variable involucrada. 


POSIBILIDADES: 


En trabajos matemáticos o técnicos, estos comandos son muy prácticos. Por esta ra- 
zón, hemos hecho aquí una referencia a los mismos, pero su campo de posibilidades de- 
pende de lo que permita hacer con ellos cada ordenador. 


FORMA de teclear la instrucción : 


Teclear FN, el nombre de la variable y el valor de la variable entre paréntesis, seguido 
de ENTER. 


EJEMPLO: 


En el caso propuesto en el ejemplo de DEF FN, el FN funcionaría así para una expre- 
sión numérica: 


SOLUCION: 
PROGRAMA COMENTARIOS 
10 DEF FN A (x)=x + x* 2 En la línea 10 se define la función. 
2 LET y =FN A (7) En la línea 20 se da el valor 7 a la variable x y se 
3 PRINT y calcula la expresión definida en 10 con este valor. 


EJEMPLO: 


En el caso de expresiones alfanuméricas tendríamos: 


SOLUCION: 

PROGRAMA COMENTARIOS 
1 LET BS = “ROMARVELLAVE” Este tipo de artificio será útil cuando, a lo largo 
2 DEF FN AS (BS) = BS (3 TO10) programa, la variable B$ cambie de contenido y 


3( PRINT FN AS (B$) sin embargo nos interese una subcadena constante 
de la misma. 
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expresión 


FOR variable = To ¿expresión | NExT variable 
numérica 1 numérica 2 


INTERPRETACION: 
La variable va cambiando de valor —de unidad en unidad— partiendo del valor dado 
por la expresión numérica 1, y hasta alcanzar el valor dado por la expresión numérica 2. 


El cambio de valor de la variable se producirá —normalmente, de unidad en unidad— 
cuando en la secuencia normal de lectura se encuentre la sentencia 


NEXT variable 


Con ella, el programa cambia su secuencia de lectura a la línea donde se encuentra la 
sentencia inicial FOR ... TO 


POSIBILIDADES: 


El cambio de valor de la variable puede ser distinto de la unidad. Para ello, bastará 
con añadir la sentencia STEP seguida de la expresión numérica 3 a la sentencia FOR ... 
TO, donde la expresión numérica 3 determinará el salto que ha de dar la variable al 
llegar a NEXT, quedando la estructura de la sentencia así: 


FOR variable De ici Eo ad | STEP! Expres: )/NEXT variable 


numér.1 numér.2 | numér.3 


En esta secuencia, la variable que sigue a FOR sólo puede ser una letra. 


Esta sentencia produce un bucle de lectura que se repite, una y otra vez, hasta que 
la variable alcanza el valor de la expresión numérica 2, pudiéndose representar esque- 
máticamente de la siguiente forma: 


Bucle FOR ... TO/NEXT normal (de unidad en unidad) 


n” de línea instrucciones 
n FOR variable ad prof expres. | 
numér.1 numér.2 
n+1 
n+2 


n +n NEXT variable 
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Bucle FOR ... TO ... STEP/NEXT unidades (de m en m unidades) 


n* de línea instrucciones 
> TO%5: 
n FOR variable 1 E ) TO ERE ) 
SN numér. 1 numér.2 

n+1 

n+ Pe Did Primero ejecutaré 
O .; pos, p TO/ EADIOS. p capos 

e, numér.3 numér.4 | paeiest 


“Ss Primero se ejecuta este bucle"completo, por cada 
n+ ma valor de la variable 1 y todos los de la variable 2 
n+m+]l 


nm 20 NEXT variable 2 
nmt3o 


NEXT A 


La secuencia normal de lectura se restablece cuando la variable 1 se hace igual a la ex- 
presión numérica 2. En ese momento, la siguiente línea a leer es aquélla que sigue a la sen- 
tencia NEXT. 


FOR: Apretar F en modo K 
FORMA de teclear la instrucción: TO: Apretar F y SIMBOL SHIFT en modo K 


STEP: Apretar D y SYMBOL SHIFT en modo K 
NEXT: Apretar N en modo K 


EJEMPLO 


1. Confeccionar un programa que, una vez ejecutado, imprima en pantalla los resulta- 
dos de la tabla de multiplicar por 2 desde Q hasta 1f. 


SOLUCION: 

PROGRAMA COMENTARIOS 

10 FOR Y = Y TO 19 En este programa nombramos la variable con la 
letrá Y; la expresión numérica 1 la hacemos igual 
a (, y la expresión numérica 2 la hacemos igual 
a 10. 

20 LETA =2* Y En la línea 20, damos a la variable A el valor que 
resulte de multiplicar por 2 el valor actual de la 
variable Y —que tomará sucesivamente los valores 
P, Le En E 4, 3, 6, Ls 8, 9 y 10—. 

3 PRINT A La línea 30 obliga a imprimirse el valor actual 


de A. 
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4 NEXT Y Al llegar a la línea 40), el programa seguirá su lec- 
tura en la línea 10), siempre y cuando el valor de Y 

5 STOP no haya llegado a 1()/. En otro caso, pasaría a la lí- 
nea 5( y el programa parará. 


EJEMPLO: 


2. Escribir un programa que, una vez ejecutado, imprima en pantalla los números im- 
pares del 1 al 50. 


SOLUCION: 

PROGRAMA COMENTARIOS 
10 FOR X = 1 TO 50 STEP 2 En este caso, obligamos a saltar a la variable X de 
20) PRINT X dos en dos —gracias a STEP 2—, partiendo del 
30 NEXT X valor 1 y hasta llegar al valor 50. 
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GO SUB número de línea 


INTERPRETACION: 


La lectura del programa salta incondicionalmente a un número de línea y continúa a 
partir de ella hasta encontrar la sentencia 


con la que se produce un salto incondicional a la línea de programa siguiente a aquélla 
que contenía la sentencia GO SUB anterior. 


INTERPRETACION: 


Estas sentencias son utilizadas cuando una parte de un programa se repite varias veces 
y, consiguientemente, es más cómodo considerar esa parte del programa como una subru- 
tina a la que poder dirigirse —gracias a GO SUB— tantas veces como sea necesario. 


También se suele utilizar GO SUB para organizar un programa en subrutinas, de tal 
forma, que su estructura sea clara. 


GOSUB: Apretar H en modo K 


FORMA de teclear la instrucción: RETURN: Apretar Y en modo K 


EJEMPLO: 


1. Para ser candidata a Miss Universo se debe medir más de 1,70 metros y pesar menos 
de 70 kilogramos. 


¿Podría hacer un programa en el que dado el nombre, la estatura y el peso de cada 
aspirante se obtuviera la respuesta de si es o no admitida? 


SOLUCION: 
PROGRAMA COMENTARIOS 


2 INPUT “¿Alguna candidata? ”;O$ En el programa anterior, introducimos las líneas 
4 2,4.6y8. 
4 IF OS = “SI” THEN GO SUB 10 Si el valor de O$ es SI, ENTONCES el programa 
se dirige a la subrutina que comienza en la línea 
6 IF O$ = “NO” THEN STOP 1(. Pero si el valor de O$ es NO, ENTONCES el 
programa termina 


8GO TO 2 

10 INPUT “¿Nombre? >”; NS En el programa anterior, borramos las líneas 70, 
20) INPUT “¿Talla? ”; T 80 y 120. Para hacerlo, basta con teclear cada uno 
3( INPUT “¿Peso? ”;P de estos tres números seguido de ENTER, con lo 
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PROGRAMA 


40 IF T< 1.7 THEN GO TO 110 
5 IF P> 60 THEN GO TO 110 
60 PRINT NS, “admitida” 

70 RETURN 

9 CLS. 

109 GO TO 10 

110 PRINT NS, “rechazada” 

120 RETURN 


COMENTARIOS 


que cada línea desaparecerá automáticamente del 
listado. 
Añadimos las líneas: 
7 RETURN y 

129 RETURN 
También podíamos haber tecleado estas dos 
líneas directamente, con lo que hubieran sustitui- 
do a las que teníamos antes sin necesidad de bo- 
rrarlas. 
Dejamos el resto del programa como estaba. 


GO TO número de línea 


INTERPRETACION: 


Se ordena un salto incondicional a un número de línea. 


POSIBILIDADES: 


La secuencia de lectura de un programa, por parte del ordenador, sigue un orden cre- 
ciente, yendo del número de línea más pequeño al mayor, de una forma sucesiva. Pero, 
cuando a lo largo de esta lectura, se encuentra con la orden GO TO, inmediatamente, el 
orden normal de la lectura se transfiere a la línea cuyo número está indicado en el nú- 
mero de línea. 


1. Hagamos utilizable indefinidamente el programa que determinaba el importe de 
una conferencia. 


SOLUCION: 


PROGRAMA COMENTARIOS 


1 INPUT “¿Número de pasos? ”¡N Al añadir la línea 40, obligamos seguir la lectura 
20) INPUT “¿Valor de un paso? ”;P del programa a partir de la línea 1f tantas veces 


3) PRINT “El imvorte de su confe- como queramos. 
renciaes ”;¡N*P 
49 GOTO 10 
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IF expresión THEN sentencia E 


INTERPRETACION: 


SI el resultado de la expresión es cierto (o falso) ENTONCES obedece la orden dada 


por sentencia. 


POSIBILIDADES: 


La expresión siempre estará formada por operadores de relación u operadores de 


relación y operadores lógicos. 


La sentencia puede ser cualquiera de las que figuran en el ESQUEMA DE COMAN- 


DOS BASIC. 


FORMA de teclear la instrucción: 


IF: Apretar U en modo K 


THEN: Apretar G y SYMBOL SHIFT en modo K 


EJEMPLO: 


1. Para ser candidata a Miss Universo se debe medir más de 1,70 metros y pesar menos 


de 60 kilogramos. 


¿Podría hacer un programa en el que dado el nombre, la estatura y el peso de cada 
aspirante se obtuviera la respuesta de si es o no admitida? 


SOLUCION: 
PROGRAMA 
1( INPUT “¿Nombre? >”; NS 


20) INPUT “¿Talla? ”; T 


3( INPUT “¿Peso? ”; P 
4() IF T < 1.7 THEN GO TO 110 


5( IF P> 6 THEN GO TO 110 


6 PRINT NS, “admitida” 
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COMENTARIOS 


El programa se interrumpirá durante su ejecución 
hasta que se introduzca la cadena de caracteres 
que represente el nombre. 

Se producirá una nueva interrupción hasta que se 
introduzca el valor numérico correspondiente a la 
talla. 

Se producirá otra interrupción hasta que se teclee 
el valor numérico del peso. 

SI el valor dado a T es menor que 1.7 ENTON- 
ra y sólo entonces, el programa salta a la línea 
110. 

SI el valor dado a la variable P es mayor que 60 
ENTONCES, y sólo entonces, el programa salta a 
la línea 110. k 

Si el ordenador llega a leer esta instrucción es, evi- 
dentemente, porque en la línea 4( el valor de T 


PROGRAMA 


7 INPUT “ Otra candidata? ”; OS 


8) IF O$ = “NO” THEN STOP 


9 CLS 


1009 GO TO 19 


110 PRINT NS, “rechazada” 
129 GO TO 79 


COMENTARIOS 


era mayor que 1.7, y en la línea 50 el valor de P 


era menor que 60, con lo cual la candidata supera 
las condiciones impuestas de talla y peso. Por 
tanto, se ordena la impresión de su nombre y el 
mensaje admitida. 

Con esta interrupción, el programa queda a la es- 
pera de una cadena de caracteres, cuya función se 
ve en la línea siguiente. 

SI la cadena asignada a la variable O$ es igual a 
NO, entonces el programa se detiene, ya que así 
lo ordena la sentencia STOP. 

Esta sentencia —que se explicará en otro momen- 
to— ordena un borrado de pantalla, con el que 
desaparecen todas las impresiones previas. 

Para que el ordenador llegue a leer esta instruc- 
ción habrá sido necesario que el valor dado a O$ 
haya sido distinto a NO y, de esta forma, habre- 
mos mandado la lectura del programa a la línea 
1, comenzando de nuevo el proceso. 

Esta línea de programa sólo será leída si alguna de 
las líneas 40) ó 50 lo permiten. 

En esta línea se provoca un salto incondicional a 
la línea 70 para saber si el proceso debe repetirse. 
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INTERPRETACION: 


Se obtiene el carácter de la tecla que se aprieta o la cadena vacía, en el momento en 
que se ejecuta la sentencia INKEYS. Dicho de otro modo, si al llegar la lectura del progra- 
ma a la función INKEY$ hay alguna tecla apretada, entonces se obtendrá el carácter de 


dicha letra; en caso contrario, el computador la considerará cadena vacía. 


Se entiende por cadena vacía aquélla que no contiene ningún carácter. Se repre- 
senta por dos comillas consecutivas (“ >”), de tal modo que si escribimos, por 
ejemplo, LET AS = “* ”, el computador considerará que la variable de caracteres 
A$ no contiene ninguno. 


POSIBILIDADES: 


Esta función se puede aplicar directamente o a través de una variable de caracteres. 
Esto quiere decir que INKEYS$, al ser una función y, por tanto, devolver un valor —un 
carácter, en este caso—, puede ser manejada como una cadena independiente, haciéndola 
igual a una variable alfanumérica o ella por sí misma. 


FORMA de teclear la instrucción: Apretar N en modo E 
EJEMPLO: 


Diseñar un bucle, dentro de un hipotético programa, que impida seguir la lectura de: 
mismo hasta que se pulse una tecla cualquiera. 


SOLUCION: 
PROGRAMA COMENTARIOS 
ss RD En función de lo expuesto anteriormente, en la 
línea 30 imponemos la condición de que mientras 
3) IF INKEYS = “* ” THEN GO INKEY$ dé como resultado la cadena vacía, la 
TO 30 lectura del programa vaya a su propia línea. Es 
decir, mientras no se apriete una tecla cualquiera, 
IDA OTAN el programa quedará detenido en la línea donde 
está INKEYS$. 


Escribir un programa que, al ejecutarlo, pregunte: “¿Es Londres la capital de Inglate- 
rra?” y, a continuación, ““Apriete S en caso afirmativo”. 
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Desarrolle el listado para emitir mensajes de acuerdo con la corrección o incorrección 


de la respuesta. 


SOLUCION: 
PROGRAMA 


10 PRINT “¿Es Londres la capital 


de Inglaterra?” 

2 PRINT 

30 PRINT “Apriete S en caso afir- 
mativo.” 

4 LET RS = INKEYS: IF RS = 

“ ” THEN GO TO 40 

5( IF RS = “S” THEN PRINT 
“Correcto”: STOP 

60 PRINT “Incorrecto” 

74 STOP 


COMENTARIOS 


En la línea 40, la ejecución del programa queda 


en un bucle sobre sí mismo, según se vió en el 
ejemplo anterior, pero utilizando INKEYS$ indi- 
rectamente, gracias a R$. 

Tanto en la línea 4f como en la 50, R$ sólo pue- 
de contener un carácter —el de la tecla apretada, 
dado por INKEY$— o ninguno —cadena vacía—. 
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INPUT “texto” ; variable 


INTERPRETACION 


Produce una interrupción en la ejecución de un programa permitiendo, de este modo, 
la entrada de información a través del teclado. 


POSIBILIDADES: 


Cuando un programador introduce un comando INPUT, está provocando una parada 
en el programa para, de esta forma, dar un contenido a la variable. 


Si el “texto” ha sido escrito, éste aparecerá en la pantalla durante la interrupción y 
hasta que el dato solicitado haya sido tecleado y se apriete la tecla ENTER. 


Si el “texto” no existe, sólo el prompt (1) típico del ordenador aparecerá en pantalla, 
indicando que está a la espera de información. En este caso, el dato que se introduzca 
será asignado a la variable. 


Esta variable puede ser numérica o de caracteres y, consiguientemente, el dato intro- 
ducido tiene que estar en consonancia con el tipo de variable. Es decir, si la variable se ha 
considerado como numérica, no se aceptará una cadena de caracteres como entrada del 
INPUT. 


Si a continuación de INPUT colocamos LINE (apretar 3 y SYMBOL SHIFT en modo 
E) seguido de una variable de caracteres, el ordenador quedará a la espera de una cadena 
de caracteres, pero en pantalla — al correr el programa— no aparecerán las comillas de la 
instrucción equivalente que sería: INPUT seguido de la variable de caracteres. 


1. Escriba un programa que, una vez ejecutado, nos pida el número de “pasos” consu- 
. . , . . .. »” 
midos en una conferencia telefónica y, a continuación, el valor de cada “paso”, para 
obtener finalmente el importe de la conferencia. 


SOLUCION: 
PROGRAMA COMENTARIOS 


1f INPUT “¿Número de pasos? ”;N Con las dos primeras líneas provocaremos, al eje- 
cutar el programa, dos interrupciones para asignar 
valores a las variables N y P. 


(1) Con la expresión prompt se viene a indicar que el ordenador está preparado para hacer su trabajo y, para ello, hace 
aparecer en pantalla un símbolo, al que por extensión se llama así. 
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PROGRAMA COMENTARIOS 


2() INPUT “Valor de un paso? “; P 


3 PRINT “El importe de su con- Con la tercera línea, ordenamos la impresión del 
ferencia es ”; texto que figura tras el comando PRINT. 
4() PRINT N * P Con la cuarta línea, ordenamos la impresión del 


resultado de multiplicar el contenido actual de las 
variables N y P. 


Cuando ejecutemos este programa, tecleando RUN y ENTER, en la pantalla aparecerá 
escrito ¿Número de pasos? y se parará a la espera del contenido de la variable N. 


Si suponemos que el número de pasos ha sido 25, tecleamos este número y, a conti- 
nuación, ENTER, para indicar al ordenador que hemos concluido, aparecerá escrito en la 
pantalla ¿Valor de un paso? y volverá a pararse a la espera del contenido de la variable P. 


Si asignamos a esta variable el valor 10), lo cual implica teclear 1) seguido de ENTER, 
aparecerá en la pantalla El importe de su conferencia es 250. 


Observe que el resultado de N * P se imprime justo a continuación del texto de la 
línea 30), debido a que éste concluye en el programa con un punto y coma (;). 


EJEMPLO: 


2. Escriba un prógrama que, una vez ejecutado, le pida el nombre de un escritor famo- 
so; a continuación, le pida el título de una de sus obras, y, finalmente, imprima en 
pantalla ambas cosas. 


SOLUCION: 
PROGRAMA COMENTARIOS 
1) INPUT “Nombre del En las líneas 1) y 20 hemos definido el nombre 
escritor? ”:e$ de dos variables de caracteres. 
2) INPUT “Título de una obra En las líneas 30 y 4f hemos ordenado la impre- 
suya? ”;t$ sión de las variables de caracteres definidas 'ante- 
3 PRINT e$ riormente, una debajo de la otra. 
40 PRINT t$ 


Sustituya la línea 10) por esta otra y compare: 
10 INPUT “Nombre del escritor?”; LINE e$ 
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INT (expresión numérica) 


INTERPRETACION: 


Se obtiene el mayor de los números enteros menores —o igual— que el indicado en la 
expresión numérica. 


POSIBILIDADES: 


El valor de la expresión numérica puede ser cualquier número real. 


FORMA de teclear la instrucción: Apretar R en modo E 


EJEMPLOS: 
PROGRAMA l COMENTARIOS 
10 LET x = 89.98 Al ejecutar este programa, obtendremos 89 im- 
preso en la pantalla, que es el mayor número 
20) PRINT INT x entero menor que 89.98. 
PROGRAMA 2 COMENTARIOS 
10 LET x = -10.17 Al ejecutar este programa, obtendremos —11 im- 
preso en la pantalla, que es el mayor número 
2) PRINT INT x menor que — 10.17. 
PROGRAMA 3 COMENTARIOS 
10 LET x = 10.17 En este caso, obtendremos 10 impreso en la pan- 
talla, que es el mayor número entero menor 
2() PRINT INT x que 10.17. 


— 
ga 


4 


LEN (expresión alfanumérica) 


INTERPRETACION: 


Se obtiene el número de caracteres que componen la expresión alfanumérica, inclu- 
yendo los espacios. 


POSIBILIDADES: 


El resultado que se obtiene con LEN es, a todos los efectos, un número y, por tanto, 
podemos utilizarlo como tal según convenga. 


También podemos usar LEN en la suma de cadenas o de variables de caracteres. 


FORMA de teclear la instrucción: Apretar K en modo E 


EJEMPLO: 


Sumar 1(/ al número de caracteres que contenga la suma de la variable a$ y la cadena 
“ABC”, suponiendo que a$ = “ZXY”. 


SOLUCION: 

PROGRAMA COMENTARIOS 

10 LET a$ = “ZXY” En la primera línea, asignamos a la variable de ca- 
racteres a$ la cadena indicada “ZXY”. 

2 LET a = LEN (a$ + “ABC”) En la línea 20, asignamos a la variable numérica a 
el número correspondiente al total de caracteres 
existente entre la cadena representada por a$ y la 
“ABC”. 

3 PRINT a + 10 En la última línea, ordenamos la impresión del re- 


sultado de la suma de la variable a más 10. 


155 


LET variable = expresión 


INTERPRETACION 


Asigna a una variable el valor de una expresión. 


POSIBILIDADES: 


Recordemos previamente que una variable contiene un valor que puede cambiar a lo 
largo de un algoritmo, pero que permanece fijo mientras no haya una instrucción que así 
lo determine. 


Existen dos clases de variables: numéricas y de caracteres. 


Las variables numéricas se representan por cualquier conjunto de caracteres —a veces, 
por una sola letra seguida de un número— con la condición de que el primero sea una 
letra. Ejemplo: LET ABcl1 = 45. 


Las variables de caracteres se representan por una sola letra seguida del símbolo $. De 
esta forma, el computador sabe que el contenido de la variable será un texto, que deberá 
ser introducido entre comillas. Ejemplo: LET A$ = “Cervantes”. 


Al referirnos a las variables, dijimos que son elementos capaces de contener un valor. 
Una expresión, por lo contrario, es un valor. 


Nada impide que el valor de una expresión varíe de acuerdo con los valores de las va- 
riables que forman parte de la expresión. 


FORMA de teclear la instrucción: Apretar L en modo K 


EJEMPLO: 


1. Definir una expresión que determine el valor del importe de una conferencia con 
Sevilla, sabiendo que el valor de cada “paso” de contador lo podemos averiguar en 
la Telefónica. 


SOLUCION: 


Empezaremos por fijar y nombrar las variables que intervienen: 

Llamaremos P a la variable que contendrá el valor de un “paso”. 

Llamaremos N a la variable que contendrá el número de “pasos”. 

Y llamaremos l a la variable que contendrá el importe de la conferencia con Sevilla. 

Hecho esto, tendremos que definir la expresión que determine el valor del importe, 
en función de los valores que contengan las variables implicadas: 


I=P*N 
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Es evidente que el importe de la conferencia será igual al resultado de multiplicar el 
número de “pasos” por el valor de un “paso”. 


Supongamos que, después de observar en el contador el número de pasos y de haber- 
nos informado en la Telefónica del valor de un “paso”, los valores de las variables P y 
N son, respectivamente, 10 y 25. Es decir, un “paso” vale 10 ptas. y el número de 
“pasos” de la conferencia ha sido 25. En función de esto, la forma de asignar variables en 
BASIC, teniendo en cuenta el comando LET, será: 


LET P=10 
LET N=25 
LET I=P*N 


Como podemos ver, la expresión en una variable numérica puede ser tanto un número 
como una expresión matemática, la cual, finalmente, es un número. 


EJEMPLO: 


2. Asignar a una variable de caracteres la expresión: 
El importe de su conferencia es. 


SOLUCION: 


»” 


LET AS = “El importe de su conferencia es 
De esta forma, el ordenador sabe que la variable A$ contiene el texto entrecomillado. 


Observe el espacio que queda entre es y las comillas. Sirve para evitar que la cifra que 
representa el valor de la conferencia quede impresa junto a es. 


EJEMPLO: 


3. Escriba un programa que, una vez ejecutado, nos dé el importe de una conferencia 
con Sevilla de 25 “pasos”, siendo el valor de cada paso 10 ptas. 


SOLUCION: 
PROGRAMA COMENTARIOS 

10 LETP = 10 Con las cuatro primeras líneas asignamos nombre 
20 LET N = 25 y contenido a las variables. Con la última línea 
30 LETI=P*N nos limitamos a ordenar la impresión del conteni- 
4() LET AS = “El importe de do actual de las variables AS e I. 

su conferencia es ” 
5 PRINT AS; I 


Al ejecutar (RUN/ENTER) el programa anterior, aparecerá en pantalla: 


El importe de su conferencia es 250 
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LIST número de línea 


LLIST número de línea 


INTERPRETACION: 


LIST ordena listar en pantalla todas las líneas del programa a partir del número de 
línea. 


Con LLIST se consigue el mismo resultado pero impreso en papel, mediante una im- 
presora conectada al computador. 


POSIBILIDADES: 


Si el número de línea no se da, se obtiene un listado del programa desde el principio 
hasta el final. 


Teclear LIST o LLIST, seguido de ENTER, para obtener el listado completo del pro- 
grama en pantalla o en papel. 


Teclear LIST o LLIST y el número de línea, seguido de ENTER, para obtener el lista- 
do del programa desde la línea del número dado, en pantalla o en papel. 


FORMA de teclear la instrucción: LIST: Apretar K en modo K 
: LLIST: Apretar V en modo E 
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j LN (expresión numérica) É 


INTERPRETACION: 


Se obtiene el valor del logaritmo natural de la expresión numérica. 


POSIBILIDADES: 


El valor de la expresión numérica debe ser mayor que (). 


FORMA de teclear la instrucción: Apretar Z en modo E 


EJEMPLO: 


Obtenga el logaritmo en base e de 6.5, utilizando su ordenador en forma directa. 


SOLUCION: 


PRINT LN 6.5 
Pulse ENTER y obtendrá la respuesta. 
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LOAD “nombre” 


INTERPRETACION: 


Instruye al computador para que cargue en su memoria RAM información procedente 
de un soporte de memoria externo del tipo casete o microcinta. 


POSIBILIDADES: 


LOAD ” ” carga el primer programa que encuentra en la cinta. 


LOAD “nombre” carga exclusivamente aquel programa que haya sido grabado (salva- 
do) en cinta con el nombre “nombre”. 


LOAD “nombre” DATA denominación de la matriz ( ). La denominación de la matriz 
se ajusta a ló indicado en la sentencia DIM, de forma que las matrices numéricas requeri- 
rán una letra para su denominación y las alfanuméricas una letra seguida del símbolo $. 
Con esta instrucción se carga la matriz que haya sido grabada (salvada) en cinta con el 
nombre *nombre”” y la reconocerá por la denominación de la matriz. 


LOAD * “ CODE carga el primer programa en código máquina que encuentra en la 
cinta. 


LOAD “nombre” CODE carga el programa en código máquina grabado (salvado) en 
cinta con el nombre “nombre”” 


LOAD “nombre” CODE dirección de comienzo, longitud cumple la misma función 
que la instrucción anterior, por tanto, esta instrucción se utiliza cuando la dirección de 
memoria desde donde queremos iniciar la carga del programa “nombre” en código má- 
quina es distinta de aquella en la que fue grabada (salvada). 


LOAD “nombre” SCREENS carga directamente en el fichero de imágenes la panta- 
lla que haya sido grabada (salvada) en cinta con el nombre “nombre”. Si “nombre” no 


existe y sólo las comillas son utilizadas, carga la primera pantalla que encuentre en la 
cinta. 


LOAD * “m”'; n? microdrive; “nombre” nos servirá para la carga procedente del mi- 
crodrive, teniendo en cuenta que no microdrive debe indicar el microdrive que debe ser 
manipulado por el ordenador y que todas las referencias generales indicadas en la instruc- 
ción deben figurar, por lo demás es válido lo dicho anteriormente refiriéndonos al casete. 


FORMA de teclear la instrucción: Apretar l en modo K 
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MERGE “nombre” 


INTERPRETACION: 


Mezcla un programa en BASIC procedente de cinta (o microcinta) con el que actual- 
mente esté en memoria, sustituyendo en éste aquellas líneas de programa que —proceden- 
tes del programa a fundir — coincidan. 


POSIBILIDADES: 


MERGE ”” Mezcla con el programa actualmente en memoria el primero que encuentre 
en la cinta. 


MERGE “nombre”” cumple la misma función, pero sólo con un programa que previa- 
mente haya sido salvado con el nombre “nombre”. 


MERGE * “m'”; no micridrive; “nombre” donde no de microdrive indica el micro- 
drive donde está instalada la microcinta que contiene el programa a mezclar. Todas las re- 
ferencias indicadas deben aparecer. 


FORMA de teclear la instrucción: Apretar T y SYMBOL SHIFT en modo E 
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16 


INTERPRETACION: 


Borra el programa que esté en la memoria RAM del computador y todas las variables 


POSIBILIDADES: 


Cuando se ejecuta la instrucción LOAD, el resultado —con respecto a un programa 
que puediera haber en la memoria RAM-— es el mismo que si se ejecuta previamente un 
NEW. 


FORMA de teclear la instrucción: Apretar A en modo K 
2 


INTERPRETACION: 


Significa “imprimir” y ordena la impresión en pantalla de la expresión o expresiones 
que figuran, optativamente, en las expresiones. 


POSIBILIDADES: 


* Si las expresiones son omitidas, una línea de pantalla salta en blanco. 


** Si las expresiones son incluidas y estas expresiones son cadenas de caracteres, de- 
bemos escribirlas entrecomilladas. 


*** Si las expresiones son incluidas y estas expresiones son matemáticas, aparecerán en 
pantalla sus valores. Recuerde que las expresiones matemáticas no se escriben entre 
comillas. 


La posición de impresión de cada expresión de expresiones viene determinada por los 
símbolos que separan una expresión de otra: 
— Un punto y coma (;) hace que la siguiente expresión se imprima justo a continua- 
ción de la inmediata anterior. 


— Una coma (,) obliga a imprimir a partir de la siguiente mitad de la pantalla o al co- 
mienzo de la línea siguiente si la otra mitad ya se ocupó. 


— Un apóstrofe imprime la expresión que la sigue al comienzo de la siguiente línea. 


Si las expresiones finalizan con una (,) o un punto y coma (;), la siguiente instrucción 
PRINT, que pudiera aparecer a lo largo del programa, comenzaría la impresión de sus 
expresiones conforme al criterio expuesto más arriba. 


En caso de no acabar con una coma o un punto y coma, la siguiente instrucción 
PRINT comenzaría la impresión de sus expresiones en la siguiente línea de pantalla que 
esté libre. 


FORMA de teclear la instrucción: Apretar P en modo K 


EJEMPLO: 


1. Escriba un programa que imprima en pantalla la cadena de caracteres: “La loba la- 


mía, lentamente, los lobeznos 3 veces”. 


SOLUCION: 
PROGRAMA COMENTARIOS 
10 PRINT “La loba ”; Por supuesto también bastaría con escribir PRINT 


“La loba lamía, lentamente, los lobeznos 3 veces” 
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COMENTARIOS 


Teclear 10 

Teclear PRINT 

Teclear * (comillas) 
Escribir el texto 

Dar un espacio 

Teclear ” (comillas) 
Teclear ; (punto y coma) 
Apretar ENTER 


Una vez seguidas las instrucciones dadas en COMENTARIOS, la línea número 
1 de nuestro primer programa estará en la memoria del ordenador. En este caso, 


tenemos un programa, compuesto por una sola línea, cuya misión es imprimir el 
texto indicado cada vez que se le ordene al computador. 
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De una forma similar iríamos tecleando las siguientes líneas del programa: 


PROGRAMA 


20 PRINT “lamía, lentamente, >”; 


3( PRINT “los lobeznos ””; 


4 PRINT “3 veces.” 


COMENTARIOS 


Teclear 20 

Teclear PRINT 

Teclear ** (comillas) 
Escribir el texto 

Dar un espacio 

Teclear ” (comillas) 
Teclear ; (punto y coma) 
Apretar la tecla ENTER 


Teclear 30 
Teclear PRINT 
Teclear ” 
Escribir el texto 
Dar un espacio 
Teclear ” 
Teclear ; 
Apretar ENTER 


Teclear 40 
Teclear PRINT 
Teclear 

Escribir el texto 
Teclear ”” 
Apretar ENTER 


RANDOMIZE | RANDOMIZE expresión numérica 


INTERPRETACION: 


Inicializa el generador de números aleatorios de acuerdo con la expresión numérica, 
con lo que la secuencia de números RND comenzará con valores distintos. 


POSIBILIDADES: 

El valor de la expresión numérica debe estar comprendido entre f y 65535, con lo 
que las secuencias RND comenzarán en diferentes lugares. 

RANDOMIZE Q obliga a RND a producir números lo más aleatorios posible. 


En algunos desarrollos técnicos y/o científicos, convendrá simular fenómenos alea- 
torios controlados, de forma tal que, variando algunos parámetros, se repita el proceso 
con los mismos valores. 


FORMA de teclear la instrucción: Apretar T en modo K 


EJEMPLO: 


1. Escriba un programa que produzca números lo más aleatorios posible, independien- 
temente de que se ejecute o se inicialice. 


SOLUCION: 

PROGRAMA COMENTARIOS 
19 RANDOMIZE Q Córralo varias veces y comprobará que, a diferen- 
2 FOR X = 1 TO 20 cia del segundo ejemplo expuesto en la ficha de 
30 PRINT RND RND, los resultados son diferentes en cada oca- 
4 NEXT X sión. 


EJEMPLO: 


2. Basándose en una misma secuencia de números aleatorios, obtenga las series de re- 
sultados que se deriven de los diferentes valores que se den por teclado. 
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SOLUCION: 
PROGRAMA 


10 INPUT A 
15 RANDOMIZE 1 


20 FOR X= 1 TO 20 
30 PRINT RND * A 
40 NEXT X 

59 GOTO 10 
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COMENTARIOS 


Entrada de valores. 

Se fija el punto de partida del generador de núme- 
ros aleatorios. 

El resto del programa está dedicado al proceso en 
estudio que, en este caso, es una simple multipli- 
cación del valor dado en la línea 1 por el RND 
correspondiente. ' 


rem REM aclaraciones 


INTERPRETACION: 


Significa rememorar, recordar y permite introducir aclaraciones y observaciones que 
pueden ser de interés en una posterior revisión o lectura del listado del programa. 


La sentencia REM no implica ningún tipo de proceso. 


POSIBILIDADES: 


Como se desprende de la nomenclatura utilizada —aclaraciones—, el texto que se utili- 
ce para las aclaraciones y ohrervaciones es opcional. Esto quiere decir que si tecleamos 
REM en una línea de programa —bien a su comienzo, bien tras el separador (:)—, ésta 
quedará impresa para servir de indicador nemotécnico. En este sentido, es frecuente utili- 
zar el separador (:) como medio de fragmentar un listado en “trozos” físicos para distin- 
guir de un vistazo los diferentes elementos de un programa. 


En todo caso, la sentencia REM se mantiene en el listado, tal como se ha escrito, sin 
ser procesada, continuando la ejecución del programa en la primera sentencia que la siga, 
bien tras un separador (:), bien en la siguiente línea del programa. 


FORMA de teclear la instrucción: Apretar E en modo K 


EJEMPLO: 


Diferentes formas de introducir aclaraciones y observaciones en un listado: 


PROGRAMA COMENTARIO 
1f REM Comienzo del programa. REM con aclaraciones. 
2) INPUT A 
3 REM REM en solitario. 
4() INPUT B 
Ms O DASS Separadores para fragmentar el listado. 
6 REM Suma REM con aclaraciones 
7 LET C= A + B: REM contador REM tras un separador. 
8) REM Fin: STOP REM antes de un separador. 
sl AA ed tea: Separadores en forma de línea. 
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INTERPRETACION: 


Con esta sentencia se permite comenzar la lectura de las constantes desde la primera 
del DATA situado en un número de línea. 


Si el número de línea no se especifica, la lectura de constantes se iniciará en la primera 


del primer DATA del programa. 


POSIBILIDADES: 


Después de que un programa lee una sentencia RESTORE, la primera sentencia 
READ que ejecute el programa accederá a la primera constante, según el criterio expuesto 


en INTERPRETACION. 


Teclear RESTORE y el número de línea, seguido de ENTER, para volver a leer las 
constantes que hay en el DATA de la línea del número dado. 


Teclear RESTORE, seguido de ENTER, para volver a leer las constantes desde el 


primer DATA del programa. 


FORMA de teclear la instrucción: Apretar S en modo E 


EJEMPLOS: 
PROGRAMA 


19 FORX=1TOS5 
20 READ V: PRINT V 
30 RESTORE 
40 NEXT X 

100 DATA 3 


PROGRAMA 
19 FORX=1TO 10 
20 READ VS : PRINT VS 
3( RESTORE 
40 NEXT X 
100 DATA “caballo”, “jinete” 
PROGRAMA 


19 FOR X =1 TOS 
20 READ VS : PRINT VS 
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COMENTARIOS 


La variable V es leída cinco veces en la línea 
20 aunque tiene una sola constante en el DATA 
de la línea 100. Esto es posible gracias al RESTO- 
RE de la línea 30, que obliga a comenzar la lectu- 
ra en el primer valor del primer DATA. 


COMENTARIOS 


La variable V$ es leída diez veces en la línea 20 
tomando el primer valor del DATA de la línea 


100. 


COMENTARIOS 


Imprime cinco veces montar, primera (en este 
caso, única) constante del DATA situado en la 


PROGRAMA COMENTARIOS 


3 RESTORE 94 línea 90. 
4) NEXT X Si fuera RESTORE 100, la impresión en pantalla 
9f DATA “montar” sería: 
100 DATA “jinete”, “caballo” montar 
jinete 
jinete 
jinete 
jinete 


169 


ANO/RANDOMIZE 


INTERPRETACION: 


Cada vez que se utiliza RND, se obtiene un valor diferente y aleatorio igual o mayor 
que () y menor que 1. 


POSIBILIDADES: 


Esta función da la misma secuencia de valores cada vez que se ejecuta el programa que 
la contiene, tecleando RUN/ENTER. 


| FORMA de teclear la instrucción: Apretar T en modo E 
EJEMPLOS: 


1. Teclee en forma directa estas tres instrucciones y observe los resultados: 


PRINT RND y pulse ENTER 
PRINT RND y pulse ENTER 
PRINT RND y pulse ENTER 


2. Teclee este programa en su computador y córralo varias veces, comparando los re- 
sultados: 


19 FOR X=0TO 29 
20 PRINT RND 
30 NEXT X 


3. Teclee en forma directa estas instrucciones y observe los resultados: 


PRINT RND * 10 y pulse ENTER 

PRINT RND *(5 + 2) y pulse ENTER 
PRINT (5 + 2) * RND y pulse ENTER 
PRINT (1.3 + 0.7) * RND y pulse ENTER 
PRINT RND * (1.3 + 0.7) y pulse ENTER 
PRINT (-10) * RND y pulse ENTER 
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SAVE “nombre” 


INTERPRETACION: 


Transfiere la información contenida en la memoria RAM de un computador a un so- 
porte de memoria externo, salvándola o guardándola para ser utilizada posteriormente, 
transfiriénd ola nuevamente al computador mediante LOAD, 


Es necesario recordar que la memoria RAM no es permanente y, al desconectar el 
computador de la corriente, toda la información que contiene se pierde. Gracias a SAVE 
y a la función que cumple, la información queda salvada, bien sobre cinta magnética, bien 
sobre disco. 


POSIBILIDADES: 


SAVE “nombre” graba (salva) en cinta (casete) el programa que actualmente esté en 
la memoria RAM con el nombre “nombre””. 


SAVE “nombre*” DATA denominación de la matriz ( ). La denominación de la matriz 
se ajusta a lo indicado en la sentencia DIM, de forma que las matrices numéricas requeri- 
rán una letra para su denominación y las alfanuméricas una letra seguida del símbolo $. 
Con esta instrucción se graba o salva —con el nombre “nombre”-— la matriz que actual- 
mente reconozca el computador con la denominación denominación de la matriz. 


SAVE “nombre”” LINE no de línea cumple la misma función que la anterior, pero con 
la diferencia de que al ser cargado en el computador con un LOAD se autoejecuta a partir 
de la línea indicada en no de línea. 


SAVE “nombre” SCREENS graba o salva en cinta todo el contenido que actualmente 
esté en pantalla. 


SAVE “nombre” CODE dirección de comienzo, longitud graba o salva en cinta —con 
el nombre “nombre” — el programa en código máquina —o bytes simplemente— que ac- 
tualmente está en memoria a partir de la dirección dada por dirección de comienzo y con 
una longitud —medida en bytes— dada por longitud. 


SAVE * “m”; no microdrive; “nombre” graba o salva en microcinta —con las mismas 
especificaciones dadas para el casete—, teniendo en cuenta que no de microdrive debe in- 
dicar el microdrive dónde está instalada la microcinta donde se ha de producir la graba- 
ción y que todas las referencias generales indicadas más arriba deben figurar. 


FORMA de teclear la instrucción: Apretar S en modo K 


Teclear SAVE o SAVE y el nombre del programa entre comillas, seguido de ENTER. 
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SGN (expresión numérica) 


INTERPRETACION: 


Esta función sólo nos devolverá 1, ó —1, según el valor de la expresión numérica sea 
mayor, igual o menor que /, respectivamente. 


POSIBILIDADES: 


Si la expresión numérica es mayor que f, SGN (expresión numérica) nos dará el 
valor 1. 


Si la expresión numérica es igual que f, SGN (expresión numérica) nos dará el valor f. 


Si la expresión numérica es menor que (, SGN (expresión numérica) nos dará el 
valor —1. 


[ FORMA de teclear la instrucción: Apretar F en modo E | 


EJEMPLO: 
1. Teclee en forma directa: 


PRINT SGN (4-206) y pulse ENTER 
Obtendrá como respuesta del computador: —1. 


2. Interprete estas líneas: 


1 INPUT A 

2) INPUT B 

3( IF SGN (A — B) = 1 THEN GO TO 1000 

4() IF SGN (A — B) = — 1 THEN GO TO 2000 

5 PRINT “Valores iguales, repita, por favor” : GO TO 


.. +... +... +... +... +... 


SOLUCION: 


En las líneas 10) y 20) se introducen por teclado dos valores. 

En la línea 30, saltará a la línea 1000 si SGN (A—B) es 1. 

En la línea 40, saltará a la línes 2000 si SGN (A—B) es —1. 

En otro caso —SGN (A—B) x f—, se emite un mensaje —““Valores iguales, repita, por 
favor””— y se pasa a la línea 16. 
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INTERPRETACION: 


Se obtiene el valor del seno de la expresión numérica, dado el ángulo en radianes. 


POSIBILIDADES: 


Las que se derivan del cálculo trigonométrico. 


Escribir un programa que permita calcular el seno de un ángulo dado en grados sexa- 


gesimales. 


SOLUCION: 


360%” <> 2 7. Esto quiere decir que si n es el ángulo en grados sexagesimales, los ra- 


dianes equivalentes son: 
27 
360 


PROGRAMA 


1 INPUT “Grados sexagesima- 


les”; n 
20 LET X = n * 2 * PI/360 


30) PRINT n; “ (**; X; ”)”, SIN X 


COMENTARIOS 


Una vez realizada la transformación a radianes 
(línea 2()), se imprime el valor del ángulo en gra- 
dos sexagesimales; a continuación, entre parénte- 
sis, su equivalente en radianes, y, después, el valor 
del seno. 
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SOR (expresión numérica) 


INTERPRETACION: 


Se obtiene el valor de la raíz cuadrada de la expresión numérica. 


POSIBILIDADES: 


El valor de la expresión numérica debe ser siempre igual o mayor que (. Por razones 
matemáticas, hay que tener en cuenta que SQR (expresión numérica) = (expresión nu- 
mérica) elevada a (1/2). 


FORMA de teclear la instrucción: Apretar H en modo E 
EJEMPLO: 


1. Teclee en forma directa: 


PRINT SQR 25 y pulse ENTER 


Obtendrá como respuesta del computador 5,que es el valor de la raíz cuadrada de 
ZO: 


Y 25=25 1 (1/2)=5 


EJEMPLO: 


2. Determine, mediante un programa, las raíces cuadradas de los números enteros 
comprendidos entre /) y 20. 


SOLUCION: 
PROGRAMA COMENTARIOS 
10 FOR X= Q TO 20 Corra este programa tecleando RUN/ENTER y 
2 PRINT “Raíz cuadrada de ”;X; observe la impresión en pantalla. 
A SQR Xx 
30 NEXT X 


mb. 
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INTERPRETACION: 


Cuando la lectura del programa llega a la instrucción STOP, finaliza la ejecución del 
mismo, pasando el computador a la situación de disponible. 


Si el programa tiene más instrucciones después de STOP, para proseguir su ejecución 
es necesario teclear CONT seguido de ENTER. 


POSIBILIDADES: 


Cuando un programa detiene su ejecución, como consecuencia de un STOP, siempre 
existe la posibilidad de continuarla si se teclea —como se ha dicho más arriba— el coman- 
do CONT seguido de ENTER. 


FORMA de teclear la instrucción: STOP: Apretar A y SYMBOL SHIFT en modo K 
e teclear la instrucción: ¿LE Apretar Cien modo K 


EJEMPLO: 
PROGRAMA COMENTARIOS 

1 INPUT A Una vez introducidos por el teclado los dos valo- 
2 PRINT A res (números) que se solicitan en las variables de 
3 INPUT B las líneas 10 y 30, el programa detendrá su ejecu- 
40 PRINT B ción en la línea 6 imprimiendo el resultado de 
SY PRINT A + B la suma. 

6 STOP Si tecleamos CONT/ENTER, seguirá la ejecución 
70 PRINT (A + B)* 2 del programa imprimiendo el resultado de la ope- 
8) STOP ración de la línea 5f) y se detendrá en la línea 80, 


donde hay otro STOP. 
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STR$ (expresión numérica) 


INTERPRETACION: 


Se obtiene una cadena de caracteres compuesta por los mismos dígitos que componen 
la expresión numérica y en el mismo orden. 


POSIBILIDADES: 


Por ser el resultado obtenido una cadena de caracteres, no podrá ser manejado como 
el número que era en la expresión numérica, pero sí —a todos los efectos— como la cade- 
na que es. 


EJEMPLO: 
PROGRAMA COMENTARIOS 
10 LET a = 1984 En la línea 2(, asignamos a la variable de caracte- 
res b$ la cadena equivalente al número contenido 
20 LET b$ = STRS a en la variable a. 
Cuando ejecute este programa, observará que, en 
3() PRINT a, b$ la misma línea y separadas de acuerdo con la co- 


ma existente entre a y b$, aparece dos veces 1984. 
Bien, pues la primera es a todos los efectos un nú- 
mero, ya que procede del valor contenido en la 
variable numérica a, mientras que la segunda es 
una cadena de caracteres. 
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VAL (expresión alfanumérica) 


INTERPRETACION: 


Se obtiene el valor numérico de la expresión alfanumérica indicada. 


POSIBILIDADES: 


Es necesario advertir que para poder aplicar la función VAL —como una transforma- 
ción de caracteres a dígitos— sobre una expresión alfanumérica ésta debe estar compues- 
ta exclusivamente por dígitos (números del Q al 9), sin ningún signo entre ellos, ya que si 
los hubiere efectuaría las correspondientes operaciones. 


EJEMPLO: 
PROGRAMA COMENTARIOS 
10 LET a$S = “1984” La respuesta a este programa es 1986, suma del 


valor de la variable a$ —transformada— más 2. 
20 PRINT VAL (aS) + 2 


EJEMPLO: 
PROGRAMA COMENTARIOS 
PRINT VAL “1985-—1” Teclee en forma directa y observe el resultado. 
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VERIFY “nombre” 


INTERPRETACION: 


Comprueba que lo grabado o salvado en la cinta coincide exactamente con el conteni- 
do en memoria y que —previamente— ha sido transferido del computador al casete (o mi- 
crocinta). 


POSIBILIDADES: 


VERIFY” ” compara el programa que actualmente está en memoria con el primer 
programa que se encuentre en la cinta. 


VERIFY “nhombre”” cumple la misma función que la instrucción anterior pero no ini- 
cia la comparación hasta que encuentra un programa que haya sido salvado con el nombre 


»”» 


“nombre””. 


VERIFY “nombre” DATA denominación de la matriz compara la matriz denominada 
denominación de la matriz y que actualmente reconoce así el computador con la matriz 
que haya sido grabada en la cinta con el nombre “nombre”. 


VERIFY “nombre” CODE dirección de comienzo, longitud compara los bytes graba- 
dos en cinta previamente con el nombre “nombre” a partir de la dirección dirección de 
comienzo y a lo largo de una longitud —medida en bytes— dada por longitud. 


VERIFY “CODE” cumple la misma función que el anterior, pero comparando con el 
primer grupo de bytes que, grabados en la cinta, se encuentre. 


VERIFY * “m”; no microdrive; “nombre” donde no microdrive indica el microdrive 
donde está instalada la microcinta. Todas las referencias indicadas deben aparecer, por lo 
demás es válido lo dicho anteriormente con respecto al casete. 


| FORMA de teclear la instrucción: Apretar R y SYMBOL SHIFT en modo E | 
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Sección lll 


Programación avanzada 


GRAFICOS Y COLOR 


Esta Sección del libro está dedicada a ayudar al lec- 
tor en el camino de transformar sus ideas en programas 
plenos de color y movimiento. 


Aparentemente los programas que se desarrollan en 
este apartado son simples juegos. No los considere así, 
ya que, según mi experiencia, los programas que po- 
drían tener el calificativo de “técnicos””, suelen ser más 
fáciles de concebir debido a que, normalmente, están 
sometidos a fórmulas y procesos muy determinados, en 
tanto que los programas de “juegos” son trozos de su 
propia imaginación. 


Todo lo expuesto a continuación tiene por misión 
abrir el campo de posibilidades que usted tiene delante, 
por tanto le sugiero que cambie y pruebe toda cosa que 
crea que mejoraría los resultados. 
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COMO GOBIERNA EL SPECTRUM LA PANTALLA DE T V. 


Si consideramos ¡a pantalla como una pizarra donde el Spectrum nos va a dar 
su respuestas a nuestras cuestiones, vamos a empezar por conocer en que forma 
la máquina usa esa “pizarra”. 


pe 


Cuando se conecta el computador al televisor, el “cerebro”” de aquél divide 


de forma inmediata, y sin que se pueda apreciar, la pantalla de éste en una ma- 
lla de 45.086 cuadritos o, lo que es igual, 256 cuadritos horizontales por 176 
cuadritos verticales (ver figura 1 en un desplegable entre las páginas 16 y 17). 
Estos cuadritos pueden estar “encendidos” o ““apagados”'. Y según la combina- 
ción de cuadritos encendidos y apagados se verá en la pantalla una figura u otra. 


Siguiendo el símil de la pizarra, la instrucción INK equivale al color de la tiza 
con la que vamos a escribir y la instrucción PAPER nos indica el color de fondo 
de la pizarra. 


Evidentemente, el término apagado significa que el cuadrito en cuestión 
mantiene el color dado por PAPER, mientras que encendido significa que toma 
el color dado por INK. 


Para aclarar este concepto tomaremos, por ejemplo, las instrucciones INK 1 
y PAPER 2. Debido a la primera los cuadritos encendidos tomarán el color azul, 
los apagados mantendrán el color general del fondo que, en este caso, es rojo y 
que es impuesto por la segunda. 


Es claro que utilizando colores para INK y PAPER con poco contraste, ape- 
nas se podrá distinguir nada. En el caso extremo en el que INK y PAPER ten- 
gan el mismo color, no habrá diferencia entre cuadritos encendidos y apagados. 
En otras palabras escribiríamos con tiza negra sobre una pizarra negra, si hu- 
bieramos elegido INK QM, PAPER O. 


Hasta ahora hemos visto cómo "'pinta” el Spectrum sobre la pantalla: veamos 
ahora cómo escribe. 


Anteriormente estudiamos que el Spectrum “contempla” la pantalla como 
un conjunto de 45.086 cuadritos (256 x 176): pues bien, el Spectrum tiene 
guardados en su memoria un conjunto de caracteres, que le es propio por dise- 
ño, tales como todo el abecedario en mayúsculas y minúsculas, los signos de 
puntuación, números, etc. y además los tiene definidos en pequeñas mallas de 
8 cuadritos horizontales por 8 verticales, de tal forma que, si tuviera que mos- 
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una zona de 8 x 8 cuadritos dentro de la 
mostrando, de esta forma, la figura del 
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trar en la pantalla uno cualquiera de estos caracteres predefinidos tomar ía, den- 


cual encendería unos y apagaría otros, 


tro de los 45.086 cuadritos totales, 
carácter deseado. 
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COMO GOBIERNA EL SPECTRUM LA PANTALLA DE T.V. 


De lo dicho hasta aquí se desprende que la pantalla gobernada por el Spec- 


trum nos puede dar 32 caracteres por línea (256/8) y un total de 22 líneas 
(176/8). 


Como ya sabemos, con la instrucción PRINT ordenamos a la máquina que 
imprima en pantalla números y caracteres en general. De acuerdo con lo visto 
anteriormente, cuando usamos PRINT para escribir una caracter en la pantalla, 
lo que estamos haciendo en realidad es decirle al computador que nos muestre 
cual es el conjunto de cuadritos encendidos y apagados que corresponde a 
ese caracter, y que él tiene “'guardado”' en su memoria. Veamos cual es la com- 
binación correspondiente a la s por ejemplo: 


Estos son los caracteres que están predefinidos en la máquina por el dise- 
ñador. 


El usuario puede definir sus propios caracteres o modificar los predefinidos. 
Esto lo veremos más tarde. 


De ahora en adelante, cuando hagamos referencia a caracteres en general es- 
taremos hablando del espacio ocupado en pantalla por mallas de 8 x 8 cuadri- 
tos. Un espacio en blanco es una malla de 8 x 8 con sus 64 cuadritos apagados. 


Recordamos que las filas van aumentando de O a 21 de arriba a abajo y las 
columnas de O a 31 de izquierda a derecha. 


Para cerrar este capítulo vamos a realizar un ejercicio de impresión en panta- 


lla, interesante desde el punto de vista de la estética y, en muchos casos, de gran 
utilidad. 
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COMO GOBIERNA EL SPECTRUM LA PANTALLA DE T.V. 


El siguiente programa nos permite imprimir asteriscos (*) en cualquier punto 
de la pantalla: 


INPUT "numero d 
INPUT '"numera d 
ES 


FRINT AT L,c;"x” 
0 TO 10 


|=a 
E 


Para imprimir un asterístico en cualquier punto de la mitad izquierda de la 
pantalla y su simétrico en la mitad derecha, hay que considerar que, si las coor- 


denadas de entrada son | y c, para su simétrico serán | y 31-c: 


INPUT "numero de linea?";¡L 
INPUT "numero de colunmnna?"; 


LET c=INT (C.-2) 
PRINT AT L,C" "¿AT L,31=-C; 


GO TO 10 


Con la línea 25 limitamos c a la mitad izquierda de la pantalla. 
Para conseguir que el asterisco se imprima según cuatro planos de simetría: 


10 INPUT "numero de linea?" ;¡l 
28 INPUT "numero de colunnaz"i; 
E 


T*C=INT 


¿31-C; 
31-c; 


Cc 
25 LET L=INT (L/-2): 
(c 2) 
30 _PRINT AT L,ci 0"; 
“AU ¡AT Sl=-L, 0; "3 ¡AT 2 


4Q GO TO 10 


L 
AT 
1- 


L 
L, 


Con la línea 25 limitamos | y c al cuadrante superior izquierdo. 
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MANEJANDO LOS CARACTERES GRAFICOS PREDEFINIDOS 


Supongamos que deseamos ponerle un marco a la pantalla, para ello escribi- 
ríamos un programa similar a éste: 


10 PRINT "xs %%%% 
FAXES 

28 FOR i¡=1 TO 20 

50 PRINT "2*"¡TAB (31); "x" 

42 NEXT i 

SO PRINT UR ri%* 
FEAR AAA 


Este marco hecho con asteriscos no queda mal, pero el Spectrum nos provee 
de 16 caracteres gráficos predefinidos, es decir, están memorizados dentro de la 
máquina. Ocho de estos caracteres están a la vista en la primera fila de teclas de 
la máquina y los restantes son, simplemente, sus inversos. 


Para obtener los ocho primeros basta con pasar al modo gráfico (cursor G) y 
apretar, a continuación, la tecla correspondiente al caracter deseado. Así, apre- 
taremos simultáneamente las teclas CAPS SHIFT y GRAPHICS para cambiar 
el cursor a G y, en estas condiciones, al apretar cualquier tecla con caracter grá- 
fico, nos producirá en la pantalla la impresión de ese carácter. 


Para conseguir las inversas tendremos que pasar el cursor igualmente a G y, 
una vez hecho esto, apretar simultáneamente CAPS SHIFT y la tecla correspon- 
diente. 


Compare los gráficos que aparecen en pantalla con los siguientes ejemplos: 
Pulse CAPS SHIFT y GRAPHICS. (Ahora el cursor está en G). Pulse la tecla 


con el número 5, la tecla con el número 6, la tecla con el número 2 y la tecla 
con el número 8. 


A continuación pulse 2 ó 3 veces SPACE y pulse nuevamente las mismas te- 
clas 5, 6, 2 y 8, pero apretando simultáneamente CAPS SHIFT. 


Como comprobará, los gráficos que aparecen en pantalla son exactamente los 
inversos a los que pulsó anteriormente. 
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aa | MANEJANDO LOS CARACTERES GRAFICOS PREDEFINIDOS 


En el programa del ejemplo anterior, podríamos hacer un marco más “'boni- 
to” con este desarrollo: 


a 


En otro orden de cosas es necesario saber cómo transformar números en ca- 
racteres. Cuando nosotros decimos que la tercera letra del alfabeto es la C, he- 
mos aprovechado la relación existente entre la posición que ocupa en el alfabeto 
y la propia letra. Pues bien, algo similar ocurre con el conjunto de caracteres 
que maneja el Spectrum, gracias a la función CHR$. 


Si nosotros tecleamos PRINT CHR$ (67) obtendremos el carácter que el 
Spectrum memoriza en la posición 67 dentro de su conjunto de caracteres 
(página 183 del manual). 
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MANEJANDO LOS CARACTERES GRAFICOS PREDEFINIDOS 


Para ver en pantalla este conjunto corramos este programa. 


19 FOR ¡=32 TO 255 
206 PRINT CHR% (1), 
30 NEXT i 


Con lo cual obtendremos: 


IRE (14). ral2idooro9d:; x= 
PABCREFGH TU KLMNOPORSTUVINIXNYZ 1x1 
Pabcderahi ¡KK mnoparstuvuxyzils “e 

a, ABCDEFGHIJIKLMNOR 
pario rre TER POINT SCREEN 
ATTR AT TRE Os COCE VAL LEN 


HR NOT BIN OR AND = 
HEN TO STEP DEF FN CAT FORMAT MO 


JE ERASE OPEN $: CLOSE Y MERGE VE 
RIFY BEEP CIRCLE INK PAPER FLASH 
GRIGHT INVERSE OVER QUT LPRINT 
LLIST STOP READ PATA RESTORE NEL! 
BORCER CONTINUE DIM REM FOR GO 
TO GO SUBE INPUT LORD LIST LET PA 
USE NEXT POKE PRINT PLOT RUN SAN 
E RANDBOMIZE IF CELS PRA CLEAR “RE 

TURN COPY 


En realidad. los 32 primeros códigos y los que siguen al 143 no son propia- 
mente caracteres predefinidos y específicamente los 91 últimos corresponden 
a palabras sentencias del BASIC, que el Spectrum considera caracteres sin 
serlos. 


Hasta aquí lo que el Spectrum nos da por diseño, a partir de ahora veremos 
lo que nosotros podemos lograr de él. 
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EN CREANDO NUESTROS PROPIOS CARACTERES GRAFICOS 


Supongamos que queremos crear un carácter gráfico que represente un jinete 
a caballo de tal forma que, siempre que apretemos la tecla adecuada y en modo 
gráfico, nuestro jinete aparezca. 


En primer lugar no debemos olvidar que los caracteres —cualquier carácter, 
predefinido o no— deben estar comprendidos en una malla de 8 cuadritos hori- 
zontales por 8 verticales y que el carácter propiamente dicho, se logra con una 
adecuada combinación de cuadritos encendidos (color INK) y apagados (color 
PAPER). 


Si representamos caballo y jinete en el cuadro correspondiente, tendremos: 


Los cuadritos sombreados corresponden a los que hemos dado en llamar “en- 
cendidos””, y que en lo que sigue los representaremos por 1 y los restantes son los 
apagados y que designamos por O. Esto nos dará la siguiente combinación de 
Oy1!: 


2222 ==000 
0000000 
oOo0o0o00-000 
000-0000 


o0o000-=00 
0000000 
OOOO ua 
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CREANDO NUESTROS PROPIOS CARACTERES GRAFICOS 


La forma de crear este carácter, parte de cualquier letra desde la A a la U y 
por la sucesiva modificación de cada línea de 8 cuadritos horizontales de la 
malla de 8 x 8 donde está inscrito el carácter seleccionado. Por tanto, hay que 
elegir una letra, la A p.e., y comenzar modificando la línea O de la malla de 
8 x 8, después la 1 y así hasta la 7. 


Estas modificaciones se realizan con POKE USR y la última combinación 
de O y 1 en que acabamos de convertir el jinete y su caballo, de la siguiente 
manera: 


90001000 


fulano 
11001000 
10111110 
ea111111 
fo0lalalo 
v0a1apala 
folevcalo 


Una vez introducida en la máquina esta rutina, y hasta que no se cambie la 
definición del carácter o se desconecte el ordenador, siempre que se apriete la 
tecla A en modo gráfico (cursor en G) aparecerá este jinete a caballo: 


El proceso para ver en pantalla este carácter es: 


19 .— Apretar PRINT. 


27 .— Pasar el cursor a modo gráfico (CAPS SHIFT y GRAPHICS). 


3” .— Apretar la tecla A. 


En estas condiciones —con la rutina de nuestro jinete en la tecla A— corra el 
siguiente programa: 


NEXT 
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UTILIZANDO LOS COLORES DEL SPECTRUM 


Supongamos que nos disponemos a escribir una carta. Lo primera que hare- 
mos, lógicamente, será proveernos de papel y lápiz. 


Algo similar sucede con el Spectrum. 


Con las instrucciones INK (TINTA) y PAPER (PAPEL) definimos el color de 
la tinta y el papel sobre el que vamos a escribir y para todo lo que siga a esos co- 
mandos, pero no a lo ya existente en la pantalla. 


Ejemplo: 


10 INPUT "introduzca el numero 
el color del papel" ;p: PAPER p 
0 ELS 
54 INPUT "introduzca el numero 
del color de la tinta";it: INK t 
da CLS 
50 FRINT "Los colores del Spec 
trumn>” 
se 0 TO 10 


En cambio, si INK y PAPER están contenidos en una instrucción que se ini- 
cie con la sentencia PRINT, estos colores son mantenidos hasta el momento en 
que la instrucción ha sido ejecutada, volviendo INK y PAPER a los colores que 
tuvieran anteriormente. 


Compare el siguiente ejemplo con el anterior: 


10 INPUT "introduzca el numero 
del color del papel";p 


50 INPUT "introduzca el numero 
del color de la tinta";¡t 


59 PRINT INK t; PAPER p;"Los c 
olores"; INK Pp; PAPER t;" del sp 
ectrum" 

648 60 TO 108 


Observe cómo se comporta el color de fondo de la pantalla en ambos casos. 


Con el comando CLS se “apagan” todos los cuadritos de la pantalla, con lo 
cual todo se torna en el color de PAPER, dando como resultado un borrado de 
la pantalla. 
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Con BORDER coloreamos toda la zona que circunvala el área de trabajo del 
Spectrum. En otras palabras, con BORDER se da color a todo lo que está fuera 
de los 45.086 cuadritos que controla el ordenador. 


Ejemplo: 


40 0 TO 10 


Observe cómo el color de BORDER afecta también a las dos líneas últimas 
de la pantalla; para ello pruebe un BORDER negro y así forzará al ordenador 
a imprimir sus mensajes con tinta blanca. 


Con INVERSE 1 conseguimos, para aquellos caracteres que sigan a esta ins- 
trucción, que todos los cuadritos cuya situación normal con respecto a esos 
caracteres debían estar encendidos, se apaguen y los que deb ían estar apagados 
se enciendan. 


Con INVERSE O volvemos a la combinación de cuadritos apagados y encen- 
didos estándar, para los caracteres afectados. 


Ejemplo: 


108 INPUT "situacion de INVERSE 
PUjii: INVERSE i 

¿20 PRINT "Los colores del Spec 
trum" 

5e 60 TO 10 


Antes de estudiar la sentencia OVER 1, recordemos que al imprimir un ca- 
rácter en una posición de pantalla donde hay otro carácter, este último desapa- 
rece para dar lugar al nuevo. 

Ejemplo: 


18 PRINT AT 10,18; +" 
20 PRINT AT 10,15; "51" 


Al correr este programa finalmente nos quedará en la pantalla el símbolo 1. 
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Si añadimos: 


5 CLS 
7 OVER 1 


nos quedará: 


s 

7 OVER_1 mos 
19 PRINT AT f(0,15;"," 
20 PRINT AT 10,15;%5 


Corriendo este nuevo programa, resultará que la impresión en pantalla estará 
compuesta por dos barras que se cruzan y con el punto de corte de ambas en 
color PAPER. 


Esta sentencia tal vez parezca complicada pero en definitiva trabaja de la si- 
guiente manera: si dos caracteres coinciden en una misma posición de pantalla, 
la sentencia OVER 1 haría que todos los cuadritos apagados se mantengan apa- 
gados, mientras que los cuadritos encendidos del último carácter continúen en- 
cendidos si coinciden con cuadritos apagados del primer carácter, o se apaguen 
si coinciden con cuadritos encendidos. 


Para anular la condición de sobreimpresión basta con la instrucción OVER 0. 


La forma de conseguir un efecto de parpadeo partiendo de las caracter ísticas 
de sobreimpresión de OVER ya estudiadas, se basa en una rutina de este tipo: 


10 PRINT AT 10,3;'"Loz colores 
del Spectrum" 

244 OVER 1 

50 FOR x=08 TO 108%: NEXT x 

40 0 TO 160 


Con BRIGHT 1 todos los cuadritos encendidos de los caracteres que sigan 
a esta instrucción aparecerán sobreiluminados, hasta que un BRIGHT O cancele 
esta situación. 


Con FLASH 1 todos los cuadritos encendidos de los caracteres que sigan a 
esta instrucción, se apagarán y encenderán intermitentemente, produciendo un 
efecto de parpadeo hasta que un FLASH O cancele esta situación. 


Estos dos últimos comandos pueden trabajar juntos para obtener una situa- 
ción de parpadeo y sobreiluminación. 
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Ejemplo: 


S INK 2: FAPER ? 
10 PRINT AT Q4,3;"Los colores d 
el Spectrum" 
12 PRINT RAT 1,3; "NORMAL" 
15 PAUSE 100 
26 BRIGHT 1 ; 
25 PRINT AT 5,3;,"Los colores d 


¡ "SOBREBRILLO" 


40 PRINT AT 1P8,3;"Los colores 
del. Spectrum" , 

42 PRINT AT 11,3; "PARPADEO" 

45 PRUSE 100 

5e BRIGHT 1 

55 PRINT AT 15,3; "Los colores 
del Spectrum" 

60 PRINT AT 16,3; "SOBREBRILLO 
Y PARPADEO" 

290 FLASH 0: BRIGHT Q 


De la misma forma en que INK y PAPER trabajan dentro de una instrucción 
PRINT dando color sólo a los caracteres de esa instrucción, también responde- 
rán INVERSE, OVER, FLASH y BRIGHT. 


Ejemplo: 


10 PRINT "Los colores” R 
28 PRINT BRIGHT 1;AT 04,12; "del 
'Sspectrum" 


Un resumen de lo aquí tratado y unas consideraciones de carácter general 
darán por finalizada esta primera parte. 


El Spectrum maneja la pantalla del televisor considerando la parte central 
como una malla de 256 cuadritos horizontales por 176 verticales. El color de 
esta zona se controla con la instrucción PAPER. El color del resto de la panta- 
lla, que rodea a la anterior, se controla con BORDER. 


Inicialmente los colores de estas dos áreas son blancos. Los caracteres se im- 
primen en la zona central de la pantalla y sobre el color fijado por el comando 
PAPER. La figura de los caracteres se obtiene sobre mallas de 8 x 8 cuadritos, 
lo cual da lugar a un máximo de 22 líneas de 32 caracteres cada una, es decir 
704 (22 x 32) posiciones posibles de carácter. 
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Hay dos líneas inferiores que quedan reservadas para la entrada de datos y la 
emisión de mensajes por parte de la máquina. 


Cada malla de carácter de 8 x 8 cuadritos tiene unas características propias 
que son conocidas como sus atributos. Estos atributos son cuatro: . 


PAPER.— Es el color de los cuadritos que rodean la propia figura del carácter 
y que hemos considerado como apagados. En otras palabras, con PAPER defi- 
nimos el color de fondo de la malla de 8 x 8. Como ya se vio, su color inicial 
es blanco. 


INK.— Es el color de los cuadritos que definen la figura del carácter y que he- 
mos considerado como encendidos. Su color inicial es negro. 


Cuando conectamos el Spectrum escribimos en negro sobre fondo blanco. 


BRIGHT.— Cada malla de 8 x 8 cuadritos puede mostrar su contenido con un 
brillo normal, como sucede al conectar la máquina, o con sobrebrillo, lo cual 
se obtiene con BRIGHT 1. 


FLASH.— Cada malla de 8 x 8 cuadritos puede mostrar su contenido mante- 
niendo el color de los cuadritos en sus colores INK y PAPER o, gracias a 
FLASH 1, convirtiendo alternativamente los cuadritos en color INK, en cuadri- 
tos color PAPER y al revés. 


Quede claro pues, que estos atributos están referidos exclusivamente a cada 
malla de carácter, por lo cual no podemos manipular cada cuadrito que forma 
la malla de 8 x 8 que la componen. No obstante, sí podemos asignar atributos 
a cada una de las 768 posiciones de carácter (24 líneas x 32 columnas, si con- 
sideramos las dos líneas últimas reservadas a los mensajes del ordenador) los 
cuales quedarán guardados en el “área de atributos de la memoria RAM”, 


Como se puede ver en la página 165 del manual, el “área de atributos” del 
mapa de memoria permite almacenar 768 bytes; un byte por cada posición 
de carácter. 


La forma en que cada byte de esta zona de memoria controla los atributos 
de cada posición de carácter es la siguiente: los tres primeros bits (del O al 2) 
controlan el color de INK, los tres siguientes (del 3 al 5) el color de PAPER, 
el siguiente (6) el BRIGHT y el último (7) controla el parpadeo (FLASH). 
Más tarde volveremos sobre esto, y especialmente sobre cómo utilizar la fun- 
ción ATTR. 
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Todos los atributos pueden ser usados, como ya vimos, dentro de una ins- 
trucción PRINT, en cuyo caso son definidos como atributos temporales ya que, 
una vez ejecutada la instrucción, los atributos vuelven a las condiciones que im- 
peraban con anterioridad. Por el contrario, cuando los atributos son fijados me- 
diante instrucciones cuya primera palabra sea una de las correspondientes a los 
atributos, entonces los atributos son considerados como permanentes. 


En el caso de que deseemos efectuar una impresión sobre una o varias po- 
siciones de carácter, pero sin alterar todos o algunos de los atributos que ten- 
gan fijados, bastará con usar el número 8. Así, si queremos realizar una impre- 
sión que mantenga la misma situación de brillo (normal o sobreiluminada) que 
tuviera esa posición de carácter, sólo deberemos introducir BRIGHT 8. Claro 
es que, si conocemos que en esa posición (o posiciones) de carácter hay una si- 
tuación de sobreiluminación, sólo tendríamos que haber usado BRIGHT 1. En 
otras palabras, usaremos el 8 cuando no conozcamos la situación que afecta a 
los atributos de esa posición de carácter y se quieran mantener. 


En otro orden de cosas puede ocurrir que, sin conocer el color de PAPER 
del que actualmente sea el fondo, se necesite un color de INK con suficiente con- 
traste como para poder ser leído. En este momento se puede utilizar el color 
INK 9- con lo cual obtendremos un color de INK que, al menos, nos deje enten- 
der lo impreso. De igual forma, si no conocemos el color de INK y necesitamos 
un fondo que nos dé suficiente contraste, usaremos PAPER 9. Como el color 9 
lo suministra el computador de acuerdo con las anteriores premisas, no siempre 
se obtendrá el mejor contraste pero sí, al menos, el mínimo necesario. 
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LA CASUALIDAD 


Nada más lejos de la casualidad que un computador. En él, todo está previs- 
to. No obstante para multitud de aplicaciones es absolutamente necesario **ma- 
nejar la casualidad”. Introducir la incertidumbre. 


Cuando tiramos una moneda al aire, existen dos posibilidades: obtener una 
cara o una cruz. De antemano no sabemos qué va a caer. Algo similar sucede en 
el lanzamiento de dados o el girar de una ruleta. 


Cabe pensar que con un computador no es posible llegar a situaciones impre- 
vistas, dado que sólo se pueden obtener resultados partiendo de funciones pre- 
establecidas. 


En sentido estricto esto es cierto. Con un computador no se pueden preten- 
der situaciones de puro azar. Todo debe estar sometido a las matemáticas. No 
obstante, apoyándonos en ellas conseguiremos números impredecibles desde el 
punto de vista práctico, los cuales son calculados a partir de una fórmula com- 
pleja y con tal rapidez, que es imposible alcanzar el resultado antes que la má- 
quina. 


Estos números que no son puramente casuales se denominan pseudoaleatorios 
y son los que producen los ordenadores a través de la función RND. 


Con RND obtendremos números iguales o mayores que O y menores que 1 
pero, con unos sencillos artificios, podemos obtener cualquier otro rango de 
variaciones. Por ejemplo: 


Números comprendidos entre 1 y 10 se obtienen aleatoriamente multipli- 
cando RND por 10, extrayendo su parte entera y sumándole uno: 


PRINTINT(RND +* 10) + 1 
RND produce la misma serie de respuestas cada vez que se conecta la máqui- 
na. Esta caracter ística puede ser útil para contrastar el comportamiento de dis- 
tintos modelos ante la misma gama de posibilidades. 


Para conseguir una sensación de casualidad total el BASIC nos provee de la 
sentencia RAND (abreviación de RANDOMIZE). 


La función RAND actúa como puntero, indicando a RND donde debe iniciar 
su serie. 
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Con RAND O se obtiene la máxima “casualidad” posible, ya que RND inicia- 
rá su serie de acuerdo con el tiempo que lleve conectado el Spectrum. En fun- 
ción de esto, la rutina que nos proveerá de resultados aleatorios será: 


10 RANDOMIZE Y 
20 PRINT RNC 
30 0 TO 20 


Si quisiéramos jugar a “cara o cruz'” con una moneda o, lo que es igual, es- 
tudiar cómo se agrupan los resultados de un suceso dicotómico, podríamos apli- 
car un programa de aste tipo: 


106 RANDOMIZE 0 
20 LET x=INT (RND*2+1) 
30 IF x=1 THEN PRINT "caras": 


40 PRINT "cruces" 
50 GO TO 20 


En el caso que se deseen analizar los resultados producidos en una serie de 
lanzamientos de un dado se podría utilizar una rutina como la que sigue: 


10 RANDOMIZE Y 

¿0 LET x=INT (RND*6+1) 
50 PRINT x 

40 60 TO 20 


Este mismo caso, pero aplicado a un juego, requeriría algo de movimiento y, 
desde luego, más emo:ión. Probemos este otro: 


2 FAPER 6: INK 1: BORDER 1 
5 60 TO 340 


10 PRINT AT_0,0;” ET ad 

y m7 .. . SET 2,0; .” ..os. AT 

35805 .. 13] 0siAT 4,0; 00 PS 
AT 5,0;" "¡AT 6,0;" 


15 RETURN 

20 GO SUB 10 

25 PRINT AT 3,0," BM no: 

26 RETURN 

30 GO SUB 29 

35 PRINT AT 3,3;"B" 

37 RETURN 

40 GO SUB 10 

45 PRINT AT 1,0;" HM X “¡ar 
Pa MAR y] "AT SA . 


46 RETURN 


0] 
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GO SUB 40 

PRINT AT O3,39;"B: 

RETURN 

GO SUB 50 

PRINWT AT 1,5;"W'¡AT S,5; BE: 


o Sama 


RANDOMIZE 0 

LET x=INT (RND:5S+1):+10 
FOR 1i=1L TO 65 

GO SUE 


s/n"; 


¡35 
19 


oleo lsisioioisTa 


PRINT AT 
STOP 


—MPOUVPRBEIAJANAD MN 


GOLES oo ruro TD 


Tm 


368 60 TO 
En este programa es de notar la interrelación existente entre los números 
de las líneas de programa y las subrutinas para generar las caras de un imagina- 


rio dado que nos daría una impresión de este tipo: 


Así, la línea 10 nos dibuja un carácter negro para representar la cara del 
“uno”, la línea 20 la cara del “dos”, la línea 30 la del “tres”” y así hasta la línea 
60, que nos dará la cara del “seis”, En las líneas 260 y 270 se genera un número 
aleatorio comprendido entre 10 y 60 que, con la instrucción de la línea 330, 
nos está dando los valores del dado en cada jugada. 


Finalmente, en la rutina comprendida entre 280 y 320, se simula la caída del 
dado en el sentido de mostrarnos varias caras del dado antes de darnos la defini- 
tiva y, de esta forma, darle suspense al juego. 


Observe que algunas caras del dado no reproducen exactamente las caras de 
un dado normal. Lo hemos hecho así para no complicar excesivamente el pro- 
grama. 


DON PEPE O EL MOVIMIENTO 


El título de este epígrafe es menos extraño de lo que parece. D. Pepe es 
el simpático protagonista de nuestras aventuras y, a semejanza de Geppeto y 
su Pinocho, vamos a darle “vida”. En la medida que lo consigamos habremos 
dominado el movimiento de gráficos en pantalla. 


En primer lugar hay que saber que el ánima de D. Pepe, como el de cualquier 
trabajo que realicemos enn el computador, es un trozo de nuestra imaginación. 


Cuanto más clara sea la imagen mental de lo que pretendemos hacer, tanto 
más fácil nos será llevarlo a la práctica; así pues empecemos por describir a 
D. Pepe y su “papel” en la pantalla. 


D. Pepe es un muñeco que tiene cabeza, tronco y extremidades y su **traba- 
jo” consistirá en correr a derecha, izquierda y ““observar””. 


Hagamos unos bocetos de D. Pepe: 


PARADO PARADO PARADO 
MIRANDO MIRANDO MIRANDO 
AL FRENTE IZQUIERDA DERECHA 
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CORRIENDO CORRIENDO CORRIENDO CORRIENDO 
DERECHA DERECHA IZQUIERDA IZQUIERDA 
POSICION | POSICION 11 POSICION | POSICION 11 


A AU 


Cuando D. Pepe esté parado moverá la cabeza a derecha, al frente y a la 
izquierda, adoptando las posiciones de cabeza de “corriendo a la derecha” y 
“corriendo a la izquierda” alternativamente y extendiendo los brazos, según 
muestran las zonas sombreadas de los gráficos correspondientes. Como se ve, 
nuestro muñeco ocupará tres posiciones verticales de carácter en pantalla. 


Según lo aprendido anteriormente sobre los gráficos definidos por el usuario, 
vamos a asimilar las siguientes teclas, en modo gráfico (cursor en G), a diferen- 
tes “trocitos” de D. Pepe: 


TECLA A (A) Cabeza mirando de frente 

TECLA B (B) Cabeza mirando a izquierda 
TECLA C1C) Cabeza mirando a derecha 

TECLA D (D) Cuerpo brazos extendidos 

TECLA B TE] : Cuerpo brazos en jarras 

TECLA F (F]) Piernas parado 

TECLA G (G) Piernas corriendo derecna-Posición | 
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TECLA H (H) Piernas corriendo izquierda-Posición | 
TECLA 1 (1) Piernas corriendo derecha-Posición 1! 
TECLA J (J) Piernas corriendo izquierda-Posición 1! 
TECLA K (K) Cuerpo corriendo derecha-Posición | 
TECLA L (L) Cuerpo corriendo derecha-Posición Il 
TECLA M (M) Cuerpo corriendo izquierda-Posición | 
TECLA N (N) Cuerpo corriendo izquierda-Posición || 


Las rutinas que nos darían las posiciones de D. Pepe, según lo ya estudiado, 
serían las siguientes: 


9 REM xx*cabeza mirando de fr 


"3"+0,BIN 00111100 
"3"4+1,BIN 010000109 
"3"+2,BIN 041011010 
"3"+3,BIN 10000001 
"3"+4,BIN 10100101 
"3"+5,BIN 01011010 
"3"+56,BIN 01000010 

R "3"+7,BIN 00100100 

REM xx*xcabeza mirando a la 


"b"+0,BIN v0eB1110 

d001voal 

20100001 

01011001 

11000001 

vv01o00010 

vv0l100100 

USR ve011000N 

REM x**xcabeza mirando a la 
dJerecharxix 

"c"+0,BIN 01110000 

ae ti, BIN 10001000 


"c"+4,BIN 10000011 
"C"+5,BIN 01000100 
"Cc"+6,BIN 40100100 

USR "c"+7,BIN 00011000 

REM xx**cuerpo brazos extend 


USR "d'"+0,BIN 00011000 
"9"+1,B6IN 00111100 
"d"+2,BIN el011010 
"d'"+53,BIN 010110910 


201 


202 
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USR 
USAR 
USR 
USAR 


“dd +4, 
ds Ie 7 
“d'"+6, 
NA 
*e*cuerpo brazos 


“e"+0, 
“e"+l, 


“e "+2 
C“Ee"?+S 
"e" +4 
de 
"e" +6 
Cer+? 


REM *xx*piernas 
E z 


REM 3x%3%P1i 


5650 PORKE 
6ra PORE 
6932 REM 


“ea FORE USR 
710 FOKRE USR 
vr20 POKE USR 
730 PORKE USR 
do FOKE USR 
75 FOKRE USR 
r6a PORKE USER 
“ra FOKE USR 
ra9 REM 


Fiexpiern 
quierda Posicion 15 


E 
ed 
“fo 42 
AMS E! 
“E +d 
A 
A 
EL ET 


ermas 
recha posicion Izx+*++* 


“3"+0 
9" "+1 
+ 


3 
“q 
"gq 


SEAT 


+ 
+ 
+ 
+ 
+ 
3 


Piera 


10011001 
10011001 
10011001 
10011001 
en jar 


BIN 
BIN 
BIN 
BIN 


00011000 
00111100 
01011010 
01011010 
10011001 
01011010 
00111100 
00011000 


vec1l1000 
edil 
ve1o00100 
elvc0Vu0a1a 
1000010 
elgcouala 
110e€e0011 
eVBevena 
orriendo de 


t0110009N 
eValzova 
11011000 
eloc10100 
e1oce010 
vcocVvola 
000011 
epa 
corriendo iz 


IN ¿V01100 
IN 20601000 
IN e0011911 
IN edialolo 
IN 10001009 
IN 410600700 
IN 11000200 
BIN vceveBoao 
corriendo de 


BIN 
BIN 
¿BIN 
¿BIN 
¿BIN 
¿BIN 
¿BIN 
¿BIN 


m 
HHHw 
LN 
tu 
a 
o 
* 
* 
> 


.h.... . ...... 


. a...» 


DONNNNN > DO A 07070) 0) 0) 0) 0) 0) 


echa posicion Ilxx+* 


sea PORKE USR 
s5s10 PORE USR 
520 POKE USR 
Y PORE USR 
PORE USR 
PORE USE 
PORE USE 
POKE USR 

REM 


1 +0, 
dee de 10 


1 +2 
10045 
“"+d, 
bo 

' ja 048, 


EEN 
isapiernas 


BIN 08100009 
BIN (08110000 
¿BIN velaeleva 
¿BIN 0106060100 
BIN 4106801949 
BIN 1ev0e10009 
5IN 11060009100 
jafofafeafafefafa] 
corriendo iz 


erda Posicion Ilz+++* 
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200 PORKE USR ".¡'"+Q0,BIN 
218 PORKE USR ". ¡'"+1,B6IN 
220 PORE USR "uy'"+2,BIN 
250 PFORE USR "1 ¡"+5,BIN 
240 PORE USR "u¡"+4,BIN 
958 PORE USR ".¡"+5,BIN 
268 PORE USR " ¡"+6,BIN 
974 FORE USR "u¡"+7,BIN 
39292 REM zsx*cuerpo corri 
echa posicion Izxxx 
10888 PORE USR "k"+0,BIN 
1010 PORKE USR "k"+1,BIN 
108289 PORE USR "k"+2,BIN 
1858 PORE USE "k"+S,BIN 
1040 PORE USR "k"+4,BIN 
10950 PORKE USR "k"+5,BIN 
108608 PORE USR "k"4+6,BIN 
1070 PORE USR "k"+7",BIN 
189929 REM zx=*cuerpo carri 
etha posicion Ilzx*+* 
1100 POKE USR "L'"+Q,BIN 
1110 PORE USR "L'"4+212,BIN 
1120 PORKE USR "L'"+2,BIN 
115060 PORKE USR "L'"+5,BIN 
1140 PORE USR "L1'"+4,BIN 
1150 PORE USR "L1'"+5,EIN 
1160 PORKE USER" '"L"+6,BIN 
11760 POKE USR "L"+T,BIN 
1129929 REM *e*cuUerpo corri 
UVierda posicion Izx*.< 
1200 PORKE USR "m'"+0,BIN 
1210 PORKE USR "m'"+1,BIN 
1220 PORKE USR "m"+2,BIN 
1250 PORE USR "m"+=,EIN 
1240 PORE USR "m'"+4,BIN 
1250 PORE USR "m"+S,BIN 
1260 PORE USR "m'"+6,BIN 
1270 PORE USE "m" +7, EIN 
1229 REM ***cuerpo corri 
vierda Posicion II+x*+ 
15080 FORE LUSR nos '+0,BIN 
1510 PORE USR +12 .,BIN 
153520 PORKE LISR "3 "BÍN 
1550 PORE USR "n'"+S5,BIN 
1548 POKE USR "n"+4,BIN 
15509 FORE USR "n"+S,BIN 
15650 FPORE LUSR "n"+6,BIN 
1570 PORE USR "n"+*,BIN 


fVppVQE1o0a 
eced41100 
eVdelelasa 
100010 
eVd1e01a 
dcc1enal 
0100011 
fafafafufofefa] 
endo der 


eVdalleva 
11811000 
10110000 
10110000 
10111000 
eVdicolao 
el1108010 
pelopena 


¡endo der 


epevclloo0a 
ellillieu 
10010000 
10110010 
elllulea 
evdloleva 
elloegena 
fealecena 
endo 129 


evVdeBllioca 
evVdd11811 
fpeco11o1 
eVvcR11ial 
evelllol 
eVdlcgloa 
elevcello 
aunar 
enda iz3 


eVde11e0R 
eVdlllilo 
covcaeleal 
1001101 
eolellio 
eVcelezloo 
coprralio 
fdeVcalaa 
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De esta forma, en las teclas convenidas, tendríamos esta serie de caracteres: 


E LOÓMPAATAR ARES A 


Los cuales, debidamente acoplados darán unas imágenes, como se verá más 
adelante, similares a éstas: 


ARRXR ÍA 


Vamos a analizar algunos conceptos básicos del movimiento antes de conti- 
nuar. 


Es práctico evitar, en lo posible, utilizar la alta resolución de gráficos —tema 
que veremos más adelante— ya que obligamos a la máquina a trabajar más, de- 
biendo, por tanto, aprovechar todas las posibilidades que nos ofrecen los carac- 
teres gráficos definidos —o no— por el usuario. 


En otro orden de cosas sabemos que, tanto el cine como la televisión trans- 
miten sus imágenes secuencialmente, de tal forma que nuestra vista lo interpreta 
como un movimiento continuo. Nosotros utilizaremos el mismo principio, 
apoyándonos en los medios que nos brinda el computador. Empecemos por ha- 
cer aparecer y desaparecer una imagen con una velocidad controlada: 


100 LET e=10 

1010 LET 3=60 

1020 PRINT AT 0,0; "*»" 
1050 FOR i¡i=1 TO e: NEXT i 
1040 PRINT RT Q,Q0;" " 
1050 FUR ¡=1 TO a: NEXT 
1068 60 TO 1000 


J 


Las líneas 1000 y 1010 nos fijan tiempos de encendido (e) y apagado (a). 
Los bucles 1030 y 1050 son retardos de encendido y apagado. En la línea 1040 
colocamos un carácter blanco (con el cursor en modo gráfico apretar la tecla 
con el número 8) para producir la sensación de “apagado”. Cambie Vd. los va- 
lores de e y a para observar diferentes posibilidades. 
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El siguiente paso para conseguir el efecto de movimiento, consistirá en hacer 
“aparecer” el carácter, hacerlo ““desaparecer”'en la misma posición, para volverlo 
hacer aparecer uno o varios espacios más adelante: 


PRINT AT 0,0," 

FOR ¿j=90 TO 10: NEXT j 
FOR i=9 TO 30 

FOR ¿j=0 TO 10: MEXT j¡ 
PRINT AT O0,i;" . 
NEXT 1 

GO TO 1000 


En las líneas 1000 producimos la impresión de la primera posición. En la 
1020 tenemos un bucle que obligará al gráfico a recorrer toda la línea O. 


En la línea 1040 hacemos avanzar el gráfico una posición “*borrando” la an- 
terior, gracias al carácter ““blanco”” introducido. Con esta rutina el movimiento 
se produce al margen de nuestro control. 


Completemos esta introducción al movimiento, desarrollando un programa 
que nos permita controlar el desplazamiento de un hipotético muñeco que ocu- 
pa dos posiciones de pantalla, una encima de otra, tal como éste: 


y que podría haber estado, sin dificultad, compuesto por dos “trocitos” de 
D. Pepe, pero que por razones prácticas está formado por un asterisco arriba y 
otros caracteres gráficos abajo. 


Con este carácter combinado vamos a lograr la sensación de que la parte in- 
terior está moviéndose constantemente: 
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laa 


60 To 1010 


El comando BEEP, además de emitir un sonido, actúa como una pausa o 
bucle de retardo. Dicho de otro modo, durante el tiempo que está emitiendo un 
BEEP, el computador no hace otra cosa y esto se puede comprobar alargando la 
duración de la línea 1050 del anterior programa con un BEEP 4, 10, por ejemplo. 


Las normas básicas del movimiento son las expuestas anteriormente y serán 
de aplicación inmediata en la animación de D. Pepe, con algunas variaciones. 
En primer lugar, los gráficos son distintos según se desplace nuestro amigo a 
la derecha o a la izquierda. En segundo lugar la cabeza ha de mirar, como ya se 
acordó más arriba, a derecha, al frente y a la izquierda cuando esté parado y 
extendiendo sus brazos —desde la posición en “'jarras''— alternativamente. 


Veamos este último caso: 


ca REN s*sxs*Cbon Peperx4 
LET C€=15 
GO SUB 2050 
2 PRINT AT Q, 
¿ATODC El” 
AS 
2 PRINT AT Q,c 
: EEEFP 3, 


a ON 
PFRINT AT 


Este programa no se puede correr. 


Doy por supuesto, que las rutinas que generan los caracteres gráficos de los 
distintos “trocitos” de D. Pepe ya están en memoria. 
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El programa que nos determinará a D. Pepe corriendo a izquierda o derecha 
y nos permitirá controlar el movimiento, se basa en todo lo estudiado anterior- 
mente: 


T a$=INKEYA 

$= 5 LEEN: LET 
128: G0 TO 2050 
ca ERAEN LET 
60 TO 2050 


ae 


a 


mín mM 


T 
<0 THEN". LET € 
A E E E 


2130 PRINT AT D,c," 
A a o 
BEEP-" Ls ls 
PRI 

AT 


Pia Fuí 


Drr Pe 
A TR E O 


Zee 
ín 
ES 


RETURN 
1F Cc>30 THEN LET 
0,31" "¿AT 


PRINTOAT OO, 
A 
BEEP_.1,15 
PRIMT AT OO, 
ET ae A 
SEEP_ .1,20 

RETURHN 


COCO 


cDRRez 
005 


FD01-J 0 


e 
1) 
y 


US 


[Ya 
A 
ua] 
10 


CU UA 


Lo TÓ 
¡515 


rá ro 


Este programa no se puede correr tal y como está. Para conseguir el efecto de 
movimiento de Don Pepe, será necesario correr juntos los programas 22, 26 y 27. 


A otro nivel de complejidad se llega al introducir más de un movimiento si- 
multáneo. 


Los rudimentos de estos programas se basan en la lectura continua y secuen- 
cial de las condiciones que se le impongan a cada movimiento. 


Para ver esto supongamos dos asteriscos que se han de mover por la misma 
línea y con una velocidad, de uno con respecto a otro, del doble. Esta última 


condición implica que mientras un asterisco avanza un espacio el otro avanza 
dos. 


Veamos este ejemplo: 


10 

20 

54 

da 

5 60 SUB 1240 

0 60 TO da 

Ta PRINT RT Q,c;" 
sa LET C=c+w 
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Un) 
Le) 


IF c=51 OR c=Q THEN LET v=- 
PRINT AT Q,c;'"*" 


cl1i=c1+w1 
1F- cl1+31 THEN LET" c1=<A 
PRINT AT 5,c1;"z*" 
RETURN 


PReeRREER 
AA 
alolololo lalo! 


En la línea 30 fijamos las velocidades de cada asterisco. En la 40 dirigimos 
el programa a la subrutina de avance del más lento. En la 50 a la de avance 
del más rápido. En la línea 90 invertimos la marcha del asterisco más lento al 
llegar a los límites de la pantalla. 


En la 140 determinamos que el asterisco más rápido al llegar al límite ¡z- 
quierdo de la pantalla, vuelva a comenzar. 


Gracias la línea 90 vemos “'rebotar”” el asterisco en los bordes izquierdo y 
derecho de la pantalla, moviéndose siempre en la misma línea. 


En el caso de balones o pelotas rebotando contra paredes, las trayectorias 
ya no tienen por qué ser horizontales o verticales y, por tanto, requieren un tra- 
tamiento especial. 


Una pelota en movimiento de un punto cualquiera a otro y sometida a una 
velocidad (v), se puede descomponer en una velocidad horizontal (h) y en una 
vertical (v). En otras palabras, cada desplazamiento de la pelota requiere mover- 
la un número de espacios horizontales y otro (igual o distinto) verticales. (Ver 
figura en página 41). 


Si llamamos l.a la coordenada que representa a las líneas y ca la que repre- 
senta a las columnas, deberemos añadir la velocidad horizontal (h) a la coorde- 
nada c y la velocidad vertical (v) a la l. 


Por otra parte resulta evidente que, cuando una pelota **choca'” con una pa- 
red vertical, devuelve la velocidad horizontal en sentido contrario, ya que la 
vertical queda invariable. 


Cuando “choca” con una pared horizontal, por similar razón, sólo devuelve 
la vertical. 


208 


DON PEPE O EL MOVIMIENTO 


Si aplicamos estos conceptos veremos a la pelota rebotar, ausente de efectos 
tales como el rozamiento, la gravedad, etc. Estas cuestiones se verán más ade- 
lante. 


De momento estudiemos este programa: 


GO SUB su 


c=cC+h 
THEN LET vw=- 


5 THEN LET h== 
BEEP_ .3,20 
PRINT A Los 
PRUSE 5 

0 TO su 

FOR i=Q TO 3] 
PRINT AT Qi; 
PRINT AT 2! 
IF 128: 

PRINT AT 
PRIMT RT 
NEXT 1 

RETLIRN 


a 


O DR ELO OS +) +] + 


Reir ERE 
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Con el bucle que se inicia en la línea 80, dibujamos el marco de la zona de 
141 ” 
rebotes”. 


En las líneas 10 y 20 determinamos las coordenadas iniciales y las velocidades. 
En la 40 varían las coordenadas de acuerdo con las velocidades. 


Con las líneas 50 y 60 se fijan las condiciones de rebote. 


En BASIC, a medida que aumentamos el número de movimientos que deban 
aparecer como simúltaneos, la velocidad de respuesta baja considerablemente. 
No obstante vamos a estudiar un caso de tres movimientos posibles simultáneos. 


Supongamos la pantalla como un recinto cerrado y que a lo largo de sus pa- 
redes izquierda y derecha se deslizan sendas raquetas, las que, controladas por 
teclado, deberán impedir que una pelota, moviéndose por la pantalla, choque 
con las paredes que tratan de proteger las raquetas. 


El siguiente programa nos da una idea de lo que puede ser un juego de tenis 
o, en términos de lo que pretendemos, un movimiento triple y, aparentemente, 
simultáneo: 


RETURN 

LET h=-.n 

RETURN 

LET di=lL-Lri 

IF dI:0 OR dI>S5 THEN BEEP . 


REM RRA AAA AAA AAA 
LET a%5=INKEY5 
AND Lrd>1 THEN LE 


30 
AND Lrd<x1? THEN L 


trd,31;" "¿AT Lrd+ 
“¡AT Lrd+2,391;"M';AaT Lrd+ 
lrd+4,31;" " 


500 LET b%=INKEYS5A 

510 IF b%="1" AND Llri>1 THEN LE 
T_—lri=lri-1: GO TO 550 

520 IF b%4="9" AND Llri<17? THEN L 
ET Llri=lri+1l 

S5S50_PRINT AT Lri,0;" "¿AT Lri+1l 
¿0 "NH ¡AT lri+2,0 "E ¡AT lri+3,0 
0 a 

540 RETURN 
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2 BORDER 1: INK 1: PAPER 6 

S REM zsz*xrecuadro de ¡Uego:** 
104 FOR i¡=4 TO 31 

$ dl INK 7¡AT 0,i;"W'";,aT 2 


só NEXT 1 

Se PAUSE 50 

55 REM z*coordenadas iniciales 
de la pelotazxzz* 

560 LET L=5: LET c=15 

65 REM zxz*x=*velocidad inicial de 
la pelotazxzzx 

YO LET v=l: LET h=1 

5 REM xx*xcoordenadas de raque 
ta derecharzz% 

350 LET Llrd=10: LET crd=31 

55 REM zx*xcoordenadas de raque 
ta ¡z2qUierdars%* 

St LET ALUtfiSstoOs ET .Cri=0 

95 REM xxx*xtrayectoria pelotazxz* 


+ 
100 GO SUB 1350 
105 REM *rx*x*desplazamiento raque 
ta derecharzz2 
110 60 SUB 400 
115 REM zx*x*desplazamiento raque 
A iZzquierdariz* 
20 GO SUB SQ0 
13 2 REM zs=xcierra el proceso Y 
Lo Da 
125 GO 


1, 


=28 THEN LET v=- 
G 


c=1 THEN GQ SUB 300 
IF _c=39 THEN GO SUB 200 
PRINT INK 1;AT as 


REM EXA RRRRAR AAA 
LET dD=L-Lrd 
IF. dD:Bd OR dDb>5 THEN BEEFP . 


Este programa requiere pocos comentarios, ya que los REM introducidos, 
junto con todo lo visto hasta el momento, lo hacen innecesario. Análice el lis- 
tado del programa y, además de aumentar su capacidad de análisis, averiguará 
cómo manejar las raquetas, el movimiento de la pelota, etc. 
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Unas consideraciones finales ayudarán en el diseño de programas. En primer 
lugar la programación en BASIC, como se ha podido ver, no presenta especial 
dificultad pero, a veces, los resultados obtenidos aparecen como lentos debido 
a que el Spectrum traduce a lenguaje máquina, una a una, todas las instrucciones 
de un programa; este tipo de “traducción” hace que llamemos intérprete a esta 
forma de BASIC, en contraposición al compilador, el cual traduce el programa 
completo a lenguaje máquina antes de correrlo dando, por esto, una velocidad 
de proceso mucho mayor. 


Otro motivo de “lentitud” procede de los saltos incondicionales tales como 
GOTO o GOSUB, que obligan a continuar el programa en una línea determina- 
da, pero, como la localización de esta línea implica una búsqueda secuencial 
desde el principio, siempre hay una pérdida añadida de tiempo. De aquí debe 
seguirse que una adecuada ubicación de subrutinas y funciones ayudará a me- 
jorar la velocidad de ejecución de los programas. 


En todo caso, antes de llegar a diseñar un programa que sea realmente ope- 
rativo, habrá que hacer modificaciones y solventar errores. 


Cuando aparece un error en un programa bien estructurado es relativamen- 
te fácil localizarlo y aplicar el remedio oportuno. Para conseguir una buena 
estructuración se debe tratar fundamentalmente: 


1% .— Definir con claridad las variables y tratar de agruparlas por tipos. Por 
ejemplo: V, V1, V2, v, v1, v2, para referirnos a las velocidades. 


2” .— Colocar los bucles FOR/NEXT en una sola línea. Si tal cosa no fuera 
posible, entonces colocar las sentencias FOR y NEXT al principio de 
su línea, de forma que sean fácilmente identificables. 


3”.— Las sentencias REM son muy útiles para clarificar un programa, pero 
no conviene abusar de ellas pues restan velocidad. 


Siempre que pueda escriba programas cortos que recurran a tantas 
subrutinas como necesite, de forma que los errores y modificaciones 
sean fáciles de poner en orden. Obviamente, aquí las subrutinas tienen 
una misión clarificadora y no, necesariamente, son introducidas por- 
que vayan a ser utilizadas muchas veces. 


5 — Numerar el programa de acuerdo con grupos de actividades. Por ejem- 
plo: hasta la línea 500 fijar parámetros, de la 1000 a la 2000 colocar 


el programa principal, etc. 


Una vez estructurado el programa, si éste —al hacerlo correr— no funciona 
adecuadamente, deberá ser comprobado para encontrar los motivos. Algunas de 
las normas básicas del proceso de comprobación pueden ser: 
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Introducir eventuales sentencias de STOP hasta ahorquillar el proble- 
ma. Con CONT podrá hacer seguir el programa con su rutina normal. 


Introducir condicionantes del tipo IF-THEN STOP para analizar, por 
ejemplo, si las variables llegan con un valor adecuado a determinadas 
líneas de programa. 


Si presume que algún bloque de su programa no funciona según lo pre- 
visto: ¡Anúlelo! Bien por borrado, bien con un salto incondicional del 
tipo GOTO. 


Introduzca ocasionales PRINT de variables para conocer los valores 
con que opera el programa en un sector, seguido, si necesita refle- 
xionar sobre ellos, de un STOP. 


Evidentemente, una vez localizado y subsanado el fallo, deberá eliminar to- 
das las instrucciones suplementarias introducidas. 
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Como ya se dijo anteriormente, trabajar en alta resolución de gráficos impli- 
ca hacer trabajar el ordenador bastante más que cuando actúa y controla carac- 
teres o, lo que es igual, manejar mallas completas de 8 x 8 cuadritos. Evidente- 
mente, actuando sobre caracteres —el Spectrum— debe manejar 704 posiciones 
posibles de carácter, mientras que en alta resolución pasaría a controlar 45.086 
cuadritos. 


Como ya sabemos, con una instrucción PRINT AT (línea, columna) posicio- 
naremos un grupo de 64 cuadritos (una malla de 8 x 8), mientras que, con una 
sentencia PLOT, situaremos exclusivamente un cuadrito. Estos cuadritos son 
la mínima porción de pantalla que el Spectrum puede controlar y que en inglés 
son conocidos como “pixel”. Cualesquiera de estos cuadritos, estará situado en 
yn plano coordenado cuyo eje de abcisas (horizontal) varía entre O y 255 y el 
de ordenadas (vertical) entre O y 175. Ambos ejes comienzan la numeración en 
el ángulo inferior izquierdo de la pantalla: 


A AA A Ab : 
E o ED 
HH RLRTARAAH IRA RRA RA 


, ODA 
t —_—rrrirrrr 
++ 


+ 
HT uE +++ 
++ 


O “+ - 

A A 
rr Tr ; 

A ATHTAA 

SOARES LAD 


IATA 
HA A rr 
ETT HA A 
+ — AAA A A ¡IRSUAPRESNARÍ rt 
HH ARRARAAAAAA 24 + + + Ar 
A rr rr 
+ .. 


] pasesona: 
3 H+100,80 27 ee 
Sas Dememnaonna HARTA 

—— . — . — + E 


T "ETE TNA t 
TIRAR TIT TÍ TITT * TT 
Rosa: cra 5 = ¿ 


255 
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El cuadrito 100, 80 estará situado en la columna 100, fila 80. Obsérvese que 
PLOT, a diferencia de PRINT, considera primero la columna y después la fila 
y, muy importante, que la numeración comienza en el ángulo inferior izquierdo 
de la pantalla. Estas diferencias serán causa de no pocas dificultades cuando 
aparezcan ambas definiciones —alta y baja— en un mismo programa. 


Estudiaremos a continuación los tres comandos del Spectrum para alta reso- 
lución de gráficos: 


RELOT DRAW CIRCLE 


Con PLOT (x, y) encenderemos —ponemos en color I|NK-— el cuadrito situa- 
do en la columna x, fila y. Tanto x como y pueden ser números o cualquier ex- 
«presión que finalmente den unos valores comprendidos entre O y 255, y O y 
175 respectivamente. 


DRAW x, y nos traza una recta desde el lugar donde estuviera situado el 
último cuadrito que hubiéramos manejado hasta otro cuadrito alejado del pri- 
mero según los parámetros x, y que siguen a DRAW., 


Es decir, si Vd. quiere trazar una recta desde una posición cualquiera hasta 
otra que esté, por ejemplo, 9 cuadritos horizontales a la derecha y 6 cuadritos 
verticales hacia arriba: 


Coordenadas 
iniciales 


deberá teclear DRAW 9,6, bien entendido que si el cuadrito final está a la ¡z- 
quierda del inicial, deberemos colocar el signo - para indicar esta circunstan- 
cia. En el mismo orden de cosas habría que actuar para desplazar la recta en 
sentido vertical y hacia abajo. 
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Resumen de signos. 


Dado un punto PLOT x, y inicial, las coordenadas del final de la recta deberán 
darse con signo positivo o negativo, según la dirección y el sentido de la recta. 


Recta Coordenadas (final de la recta) 


10 INPUT "a3bscisa del cuadrito 
oy 
20 INPUT "ordenada del cuadrit 


“Y 
"PLOF x,Yy 
, INPUT "abscisa cuadrito fin 


e ae 
INPUT "ordenada cuadrito fi 


¿Yi 
PRA x1,y1 
GO TO 40 


Con DRAW podemos trazar líneas quebradas, comenzando cada segmento 
donde acaba el anterior. Esta posibilidad se puede observar mediante el progra- 


ma anterior: 


Pruebe a iniciar el programa (líneas 10 y 20) con x = O, y = 167. Continúe con 
x = 255, y = 0; después x = O, y =-167. Siga con x = -255, y = O y finalice con 
x=0, y = 167. 
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Para acabar este ejercicio, haga x = 127, y = -83 y después x = 127, y = 83. Y 
de esta forma se obtendrá el dibujo de la figura siguiente: 


Para trazar una circunferencia con centro en el punto x, y, con radio r, bas- 
tará con utilizar CIRCLE x, y, r. Para comprobar esta función de forma inme- 


diata apriete CIRCLE y a continuación 133, 88, 50. Ahora ENTER. Corra el 
programa. 


BORDER 1: INK 1: PAPER 6 
FOR x=10 TO 245 STEP S 
LET r= do 

CIRCLE x,8389, 

IF x>70 THEN GO TO 40 
NEXT x 


y obtendremos una sucesión de circunferencias de radios aleatorios, compren- 
didos entre 0 y 1, similar a ésta: 
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Tanto INVERSE como OVER pueden ser usados en alta resolución, ya que 
sólo actúan sobre un solo cuadrito y su forma de trabajar es bastante más simple 
que sobre caracteres. 


INVERSE 1 puede considerarse como un sistema de borrado. 


Por ejemplo: 


5 BORDER 1: INK 1: PAPER 6 
10 PLOT 0,04: DRA 255,175 
20 FOR i=8 TO 175: NEXT i 
E A 4,0: DRAL INVERSE: 1,25 
> e 


Para conseguir el efecto de borrado se debe seguir la misma dirección de tra- 
zado pero con INVERSE 1. 


Con respecto a OVER, si hay un puntillo en color INK en una determinada 
posición de pantalla y aplicamos un OVER 1 sobre esa posición, el puntillo 
cambiará su color a PAPER y al revés. El siguiente programa cambia algo con 
respecto al anterior. Pruebe y analice las variaciones. 


BORDER 1: INK 1: FAPER 6 
: 255,175 
2 ONEZCT. 1 
PLOT 0,4: R OVER 1,255,1 


PRUSE Su 
PLOT 0,0: OVER 04,255,1 


GO TO 10 


Si combinamos OVER 1 con INVERSE 1, ambos efectos se cancelan, ya que 
INVERSE 1 hace a todos los comandos de alta resolución donde se aplique, 
producir cuadritos en color PAPER. Según lo visto anteriormente, con OVER 1 
un puntillo en color PAPER pasa a tomar el color INK. Por tanto nada cambió. 


Una vez aquí, es conveniente resaltar un par de cosas. Primero, para trazar 
figuras en pantallas donde ya exista alguna impresión previa —la cual no se quie- 
ra hacer desaparecer ni tocar— es de uso OVER 1, tanto para su dibujo como 
para su borrado. 
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Por ejemplo: 


ORDER 1: INK 121: PAPER 6 
RINT AT 10,5;"Los colores 


PBRAL OVER 1;,255,1 


30 PRUSE 75 
E? FLOT 0,0: DRAW OVER 1;255,1 


En segundo lugar, una instrucción del tipo PLOT INVERSE 1, OVER 1, x, y 
será una forma, a veces muy útil, de posicionar el cursor de los pixels “invisible- 
mente”” donde nos interese. 


POINT es otra función que actúa sobre cuadritos individuales y su misión es 
indicarnos si ese cuadrito está encendido o apagado (INK o PAPER), respon- 
diendo O para apagado (color PAPER) ó 1 para encendido (color INK), 


nar n al 
AM 


—4 . 
pa] n +. 
Ejemplo: 110 PRINT AT 20, 


Al correr este programa habremos puesto en color INK una malla de 8 x 8 
cuadritos, en la posición de carácter situada en la línea 20, columna 1, o lo que 
es igual, todos los cuadritos situados entre las abcisas 8 y 15, y entre las orde- 
nadas 8 y 15 (Mire el desplegable de la página 17). 


Si en estas condiciones probamos, por ejemplo, la sentencia directa PRINT 
POINT (12, 12), obtendremos un 1 (encendido) como respuesta del ordenador. 
Si por el contrario, y una vez corrido el programa nuevamente, tecleamos PRINT 
POINT (20, 20) la respuesta sería N, ya que el “pixel” elegido está fuera del ca- 
rácter azul (INK 1) impreso por nuestro programa. 


Puesto que los atributos controlan una posición de carácter completa (ma- 
lla de 8 x 8 cuadritos), nunca afectarán a un sólo cuadrito individual, lo cual 
traerá algunas complicaciones que se deben conocer. Así, mientras podemos 
usar INK, PAPER, BRIGHT y FLASH dentro de sentencias de alta resolución, 
los atributos siempre actuarán sobre toda la malla de la posición de carácter 
donde los cuadritos controlados por PLOT, DRAW o CIRCLE estuvieran. Di- 
cho de otra forma, dentro de una posición de carácter no pueden existir más de 
dos colores: el correspondiente a INK y el correspondiente a PAPER, y a am- 
bos los controla la última instrucción INK/PAPER que haya recibido. 


10 CIRCLE INR 2,123,50858,50 
20 PLOT 4,0: DRA INK 5,255,177 
5 
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En este programa, debemos observar cómo todas las posiciones de carácter 
donde van cayendo los sucesivos cuadritos encendidos de la circunferencia, van 
tomando color rojo. En los puntos donde se cortan la circunferencia y la recta, 
toda la posición de carácter afectada toma el color azul para INK (cuadritos en- 
cendidos de la malla). 


Para afianzar la idea de la alta resolución vamos a desarrollar y comentar 
unos programas: 


INPUT 
INPUT 
INPUT 


INPUT 
INPLIT inicial? 


BORDER b: INK : PAPER Pp: 
PRPER p 

FLOT OVER 1l,x,34Y 

LET d%=INKEYGS 

IF d%s="4" THEN GO SUB Su 
GO SUB 4090 

IF Y:<18 THEN PRINT AT Q0,5;" 


IF y<100 THEN PRINT AT 0,6; 
PRINT AT 0,0;x;¡TAB 3;",";¿TA 


FOR f=a TO 1 

PLOT OVER f;x,Y 
NEXT f 

0 TO 6n 

IF xx<0 THEN LET x= 
IF x2>255 THEN LET 
IF u:Aa THEN LET Y= 
IF yY>17S THEN LET 
RETÚRN 

LET a$= INKEY 5 


r 
u 
181] 


JAJA 1 


a 
1 
2 
a 
5 
zS 


-] 


0 


GUmMrOr0 
aloloflole o 


Y 03 MO TO TO TO 


MIU 
+1+1 
RRE 


RETURN 


De la línea 200 a la 220 tenemos un bucle de parpadeo. de la 300 a la 330 
tenemos las condiciones en los bordes. 
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Para conseguir una serie de “pisos” en la pantalla con “agujeros”* que se des- 
placen por ellos, podemos estudiar el siguiente desarrollo: 


BORDER 5: INK 1: PAPER 6 
PLOT 0,50: DRA 255,0 
FLOT 06,100: DRAW 255,0 
¿150: DRAW 255,0 
: DRAW 255,0 


S 
¿x,100: IF x>15 
LET e=x-15: PLOT OVER 1,e,1 


50 PLOT OVER 1,x,50: IF x>15 T 
HEN _LET e=x-15: PLOT OVER 1,e€,50 
250 PLOT OVER 1,x,3: IF x>15 TH 
EN LET e=x-15: 1,e,3 


LET wi=x1-158: PLOT OVER 1,w 

LET_X1=X141: IF x1=255 THEN 

E 

PLOT OVER 1,255-x,150: IF 
>15 THEN _LET e=565-x-16: PLOT 06 

(3 

PLOT OVER 1,x,150: IF x>15 

LET e=x-15: PLOT OVER 1,e,1 


NEXT x 
GO TO 30 


Es conveniente acostumbrarse a tratar de interpretar los listados antes de 
recurrir a los comentarios. En cualquier caso el programa anterior nos define, 
en la primera línea, los colores con los que vamos a trabajar. A continuación 
posicionan los cuadritos de arranque y finales de un conjunto de rectas hori- 
zontales. Entre las líneas 80 y 320 se establece un bucle para conseguir, gra- 
cias a la instrucción OVER, la sensación de que los agujeros se desplazan so- 
bre las líneas, obteniéndose pantallas de este tipo: 
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Con estos listados se pueden desarrollar juegos muy atractivos. 


¿Se imagina a D. Pepe corriendo sobre estas líneas, tratando de saltar a tra- 
vés de los agujeros superiores y evitando caerse por los inferiores? 


Para finalizar este epígrafe, diremos que el comando DRAW puede ser usado 
para trazar arcos de circunferencias siempre que éstos se midan en radianes. 


Por ejemplo: 


S INFUT "Pulse un valor de Q 
a5 "¿mm 

10 FLOT 160,100 
20 CRA 50,50,m 
50 0 TO 5 
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Antes de poder percibir el significado de sentencias tales como PEEK y 
POKE, necesitaremos conocer algunos conceptos generales sobre los procesos 
internos en un computador. 


Todo se basa en la electrónica digital. No se preocupe. Ni nos hace falta, 
ni tocaremos esta rama de la técnica, pero sí necesitamos conocer aquellos as- 
pectos que afectan directamente a un programador. 


Digital: Perteneciente o relativo a los dedos. Esta es la definición que nos da 
el diccionario. 


¿Y qué tienen que ver los dedos con los ordenadores? pensará Vd. Pues bien, 
todo viene de antiguo. 


Los seres humanos tenemos diez dedos, cinco en cada mano, lo cual ha he- 
cho normal contar cualquier cantidad como el número de veces que contiene, 
esa cantidad, los diez dedos. Así 24 naranjas corresponden a 2 veces 10 dedos 
más cuatro dedos: 2 x 10 + 4 = 24, 


24 es un número, y el 2 y el 4 también lo son, pero los números comprendi- 
dos entre el O y 9 —ambos inclusive— son conocidos como “digitos” para dar- 
nos a entender que son aquéllos susceptibles de ser contados directamente por 
los dedos de nuestras dos manos. Es decir son los símbolos fundamentales del 
sistema decimal que es, lógicamente, el de uso corriente entre las personas. 


En otro orden de cosas, pero profundamente ligado a lo anteriormente ex- 
puesto, los ordenadores solo pueden reconocer si un impulso eléctrico puede 
—O0 NO— pasar por un interruptor. Si pasa le asignamos un 1, en caso contrario 
un 0. Vamos, que un ordenador tiene dos dedos y, consiguientemente, sólo dos 
dígitos básicos —1 y O— de un sistema de numeración de base dos o binario. 
Esto quiere décir que, al tener dos dígitos, sólo podrá interpretar números for- 
mados por esos dígitos o, lo que es lo mismo, series de ceros y unos. 


Cualquier número en base diez tiene su equivalente en base dos y, lógicamen- 
te, al revés. Por ejemplo, 17 en base diez se representa por 10001 en base dos. 
Puede estudiar esto con más profundidad. Vea la página 217 del manual. 


Conocido ya porqué los ordenadores utilizan el sistema de numeración bina- 
rio (o base dos) vamos a ver cómo lo'manejan; para ello necesitamos conocer 
el significado de algunas palabras. 
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Un bit (se pronunca bit) nos indica uno de los dos estados —o d ígitos— que 
un computador puede interpretar, y el número de bits que maneja dependerá 
de su microprocesador —verdadero cerebro del sistema— el cual, en el caso del 
Spectrum, es un Z80 de 8 bits que, consiguientemente, permite representar nú- 
meros comprendidos entre O y 255 —en base decimal— o, lo que es igual, puede 
hacer combinaciones de unos y ceros situados entre 00000000 y 11111111. 
A cualquiera de cada una de estas posibles combinaciones de 8 bits, se la cono- 
ce por un byte (se pronuncia bait) en su original vocablo anglosajón. O como un 
octeto. 


Cada uno de estos bytes lo guarda el ordenador dentro de su memoria, en 
una posición definida, por lo que se conoce como una dirección de memoria. 


La memoria está organizada como una secuencia lineal de direcciones o, sirva 
el ejemplo, como una calle con todas las casas en la misma acera, 8 pisos por 
casa y un sólo vecino por piso. Estos vecinos solo pueden ser HD ó 1. 


Los números binarios ubicados en sus respectivas direcciones de memoria, 
son interpretados por el computador como números, caracteres o instrucciones 
dependiendo de su situación en la memoria. 


La memoria está organizada en áreas, las cuales ocupan espacios fijos o varia- 
bles dentro de un orden preestablecido denominado mapa de memoria: 


DIRECCIONES 
65535 (48k) CONTENIDO TIPO DE MEMORIA 
32767 (16k) => 
RAMTOP | GRAFICOS DEFINIDOS USUARIO | 


PILA SUBRUTINAS 
* PILA MAQUINA 


MEMORIA DISPONIBLE 


PILA CALCULADOR 

ZONA TRABAJO ACTUAL. 
ZONA VARIABLES 

ZONA PROGRAMAS 


CANALES 
ZONA MICRODRIVES 


VARIABLES SISTEMA 
BUFFER IMPRESORA 


FICHERO ATRIBUTOS 
FICHERO IMAGENES 


INTERPRETE BASIC 
SISTEMA OPERATIVO 
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Como se puede ver, hay dos zonas claramente definidas, la inferior corres- 
ponde a la memoria ROM (Read-Only Memory) y a la cual sólo se puede acce- 
der para “leer” el contenido de la misma y la memoria RAM (Random Acces 
Memory) que puede servir tanto para escribir como para leer información. En 
otras palabras, la memoria RAM puede ser usada para almacenar o reclamar 
información, mientras que la ROM sólo sirve para reclamar aquella información 
que el fabricante haya introducido en ella y contiene, en el caso del Spectrum y 
entre otras cosas, el ““interpreter'”* —o traductor simultáneo— del lenguaje BASIC. 


La capacidad de memoria de un ordenador es función de la cantidad de in- 
formación que pueda almacenar pero, siendo la unidad elemental de memoria 
el byte, tendremos que la memoria se mide en bytes o, más usualmente, en 
kilo-bytes, Kb o K sin más. Una K hace referencia a mil bytes, pero es sim- 
plemente una aproximación nemotécnica, ya que una K contiene exactamente 
1024 bytes. 


Así, un Spectrum de 16 K RAM indica que su capacidad de almacenamiento 
es de 16384 (16 x 1.024). 


Dicho esto, podemos entender ya que cualquier posición de memoria puede 
guardar un número comprendido entre O y 255. Ahora veremos que un carácter 
se almacena como un conjunto de 8 bits. 


En la página 183 del manual del Spectrum está el juego de caracteres. La 
primera columna es la denominada “código” (CODE) y está formada por nú- 
meros que van del O al 255 y la segunda es la denominada “carácter”” (CHR). 
Esto significa que el código 65 está asimilado al carácter 65, de tal forma que si 
tecleamos PRINT CHR$ (65) obtendremos la letra A por respuesta. En definiti- 
va cualquier posición de memoria puede contener un número entre O y 255, el 
cual será interpretado de acuerdo con la segunda colurnna de la tabla de carac- 
teres del Spectrum. 
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Estas instrucciones están dirigidas a darnos información o manipular sobre 
las posiciones de memoria. 


Pero, quizá, lo primero a saber es qué interpretación tendría —en español— 
estas dos palabras inglesas: 


PEEK - Atisbar POKE - Hurgar 


Bien, pues realmente esto es lo que nos permiten hacer. Con PEEK atisbamos 
lo que hay en una determinada posición de memoria definida por su dirección. 
Así, por ejemplo, si pretendemos conocer el contenido de la dirección de me- 
moria 18121 bastaría con teclear PRINT PEEK 18121. Dado que PEEK siem- 
pre nos devolverá un número decimal —sin que esto implique que no pueda re- 
presentar un número, un carácter o una instrucción— lo podríamos asimilar, si 
fuera de interés, a una variable numérica: LET a = PEEK 18121. 


Quede claro que PEEK sólo “atisba” y, por tanto, no modifica ni altera nada 
de lo ya existente en memoria. Dicho con claridad: “no es peligrosa”. 


Con POKE la cosa cambia. Ya no se atisba, se hurga. Nos dirigimos a una di- 
rección de memoria no para “atisbar”” sino para “insertar”” un determinado va- 
lor en esa posición y, por tanto es “peligrosa” ya que podríamos modificar po- 
siciones situadas dentro de sectores de memoria vitales (memoria ROM). 


Con POKE almacenamos un byte en cualquier posición de memoria, incluso 
en una que ya está habilitada por Vd., con lo cual perdería su contenido en fa- 
vor del nuevo. 


Como ejemplo vamos a teclear POKE 18121,65 almacenando, de esta forma, 
en la dirección 18121 el número decimal 65, con lo cual un PRINT CHR$ 
(PEEK 18121) nos da una A en pantalla. 
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Cabría pensar que un programador sólo necesita conocer la sintaxis del len- 
guaje de programación que utiliza y todas las palabras del mismo pero, es el 
caso que, a medida que domina las interioridades de su computador, puede 
obtener soluciones que serían inalcanzables sin tales conocimientos. Por tanto 
rogamos al lector un esfuerzo más, garantizándole que quedará sobradamente 
compensado. 


Antes de ir más allá, recordaremos que el número más grande que se puede 
almacenar en una posición de memoria cualquiera está compuesto por 8 bits 
—que equivale a un byte— que corresponde a una combinación de ocho *'ceros”' 
y “unos”. Por tanto, la combinación mínima vendrá dada por 00000000 y la 
más alta por 11111111, esta representación pertenece al sistema binario. Si lo 
.expresáramos en el sistema decimal diríamos que en una posición de memoria 

se puede almacenar un número entre O y 255. 


Así, si usamos una posición de memoria para contar, empezaremos por O y 
seguiremos sin dificultad hasta 255 pero, si aquí intentamos añadir otra unidad, 
no almacenaremos el número 256, sino que comenzaríamos otra vez a contar 
desde el cero. Pues bien, para alcanzar números superiores a 255, el computa- 
dor habilita otra posición de memoria de tal forma que, cada vez que la anterior 
posición comienza a O, la nueva aumenta una unidad. En estas condiciones, po- 
dríamos seguir contando en la primera posición de memoria como si nada hu- 
biera pasado, mientras la segunda posición de memoria actúa como un contador 
del número de veces que la primera ha alcanzado 255. 


La primera ubicación cuenta números entre O y 255 y es conocida como el 
byte menos significativo (LSB. Least Significant Byte) y la segunda ubicación 
cuenta de 256 en 256, y es conocida como el byte más significativo (MSB. 
Most Significant Byte). 


Con un PEEK sobre el LSB, obtendremos un número entre O y 255 que re- 
presenta justamente ese número, pero un PEEK sobre el MSB nos dará el núme- 
ro de veces que contiene 256. Esto, en términos que entienda el BASIC y sien- 
do n la posición de memoria del LSB, sería: 


PEEK n + 256 * PEEK (n + 1) 


obteniendo de esta forma el número que está almacenado en estas dos posi- 
ciones de memoria, el cual, evidentemente, irá desde O hasta 65.535. 
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En sentido contrario podemos trocear un número para almacenarlo en dos 
ubicaciones de memoria; para ello lo dividiremos previamente entre 256 para sa- 
ber el número de veces que lo contiene y almacenarlo en el byte más significa- 
tivo (MSB) y entonces almacenar el resto en el byte menos significativo (LSB). 


Esto es: 


POKE n + 1, INT (N/256) 
POKE n, N - 256 * INT (N/256) 


Siendo n la dirección del LSB y N el número a trocear. Con POKE lo que ha- 
cemos es colocar los trozos adecuados en las direcciones de memoria seleccio- 
nadas. 


Una vez en este punto echemos un vistazo a la página 174 del manual del 
Spectrum, segunda de las dedicadas a las variables del Sistema. En la primera 
línea se nos indica que las direcciones 23606 y 23607 están dedicadas a cono- 
cer las ubicaciones de memoria del juego de caracteres del Spectrum, de tal 
forma que, para obtener la dirección de memoria donde se inicia la tabla de 
caracteres, deberemos hacer la siguiente operación —de acuerdo con lo visto 
anteriormente—: 


PEEK 23606 + 256 * PEEK 23607 + 256 = 15616 


Los dos primeros sumandos representan un número decimal comprendido 
entre O y 65535 el cual, y según se indica en el manual, nos da la dirección 
de arranque (menos 256) del conjunto de caracteres. 


El número de la dirección de arranque obtenido, sitúa el conjunto de carac- 
teres dentro de la zona de memoria ROM que va desde la dirección Oa la 16383, 
lo cual es lógico si tenemos en cuenta que el computador, una vez conectado, 
está en condiciones de trabajar gracias a su memoria ROM donde guarda toda 
la información básica del sistema y, entre ella, el juego de caracteres. 


Este juego de caracteres, según el apéndice A del manual, va desde el SPACE 
(código 32) hasta el símbolo O (código 127). 


Por otra parte, ya vimos que todo carácter está contenido en una malla de 
8 x 8 cuadritos y que cada fila de esta malla es una combinación de “unos” y 
“ceros”, para diferenciar los cuadritos encendidos de los apagados. 
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Por ejemplo: 


¡[ojojojojojojojo) 
O-===== 00 
oo0o-00-=0 
o0o0o-00-0 
oo0o-00-0 
0000-00-00 
O 2» =2=2=00 


En el ejemplo anterior hemos representado el modelo de malla de 8 x 8 de 
cuadritos encendidos y apagados que el ordenador tiene en su memoria ROM 
para la letra A y, dado que una dirección de memoria sólo puede guardar un 
byte, deducimos que cada carácter necesita 8 direcciones de memoria, una para 
cada fila, y de esta forma ser '“memorizado”. 


La columna de la derecha son los números decimales que corresponde a los 
números binarios que representan los “ceros” y “unos” de cada fila de la malla 
de 8 x 8 y, en definitiva, serían los números decimales obtenidos al aplicar 
PEEK sobre cada una de las 8 direcciones de memoria en que está almacenado 
el carácter. 


La cuestión ahora vendría al querer saber dónde está —o cuál es— la direc- 
ción de memoria de la primera fila de *ceros”* y “unos” de cualquier carácter. 
Para responder a esto debemos recordar que la dirección de memoria donde se 
inicia la tabla de caracteres es: PEEK 23606 + 256 * PEEK 23607 + 256 = da 
(dirección de arranque) y también que la tabla comienza en el código 32 (SPACE). 
Por lo que de ambas cosas es fácil deducir que la dirección de memoria inicial 
de un carácter cualquiera —c— viene dada por: 


de = da + 8* (c-32) 


Siendo da la dirección de arranque ya citada y de y c la dirección y el código 
del carácter en cuestión. 


Quiere decirse, que un PEEK dc nos daría el contenido, en decimal, de esa 
posición de memoria. Con una simple transformación a binario habríamos ob- 
tenido la combinación de *“*ceros”” y “unos”” que la memoria ROM guarda como 
modelo de la primera fila del carácter c. 
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En este momento ya conocemos dónde y cómo guarda en memoria el orde- 
nador el conjunto de caracteres. 


Una aplicación típica de todo lo tratado en este capítulo es el trazado de 
caracteres y cadenas de caracteres de gran tamaño. 


Para llegar a un programa que nos haga tal trabajo, iremos por partes. Con la 
rutina que sigue, imprimiremos en pantalla la fila de arranque, en “ceros” y 
“unos” del carácter elegido como modelo para esta primera etapa. 

(ver tabla de conversión). 


E INPUT "seleccione caracter 
e a 
el 

¿20 IF LEN c%>1 THEN GO TO 10 

Se LET da=PEEK 25606+256*PEERK 
25607+256 

40 LET dec=da+58x (CODE c%-32) 

S0 LET fF=PFEER Es 

i¡=0 TO 
=f- 2% INT CEACIUS LED ES 


su PAINT AT 21, (20-2xi);6b 
290 NEXT i 


Para conseguir el carácter en cuestión completo, en su malla de “ceros” y 
“unos”, sólo tendríamos que añadir un bucle FOR/NEXT: 


Ss INPUT "seleccione caracter 


¿Có5 
20 IF LEN c%>1 THEN GO TO 10 
30_LET da=PEER 25606+256*PEEK 
25607+256 

40 LET dec=da+S* (CODE c4-32) 

45 FOR ¡=08 TO ? 

50 LET f=PEER (dc+,) 

i=0 TO ? 

=f-2% INT (fr2): LET f= 


350 PRINT AT 21, (20-2%1);6b 
390 NEXT _i 

100 PRINT “7 

110 NEXT ¡y 
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Al conocer este programa seleccione el carácter “s”” y, si respondemos con 
una “y” al Scroll?, veremos el conjunto de O y 1 que forman la malla de 8 x 8 
del carácter elegido, como se puede apreciar en la representación que sigue: 


a Q a 
a 1 a 
O a [5] 
a E 15] 
o Q Z 
a 1 o 
a o a 


Si allá donde aparezca un O dejamos su posición de carácter en color papel 
(PAPER) y donde aparezca un 1 colocamos una posición de carácter en el color 
(INK) que deseemos, habremos obtenido una representación a escala del carác- 
ter introducido en c$, de esta forma: 


PAPER 6: INK 1: BORDER 1 
INPUT "seleccione caracter 


IF LEN có%>1 THEN GO TO 10 

30 LET da=PEEK 25606+256*+PEER 
253607+256 

40 LET dec=da+S8x (CODE C%-32) 

45 FOR ¿=0_ TO ? 

50 LET f=PEEK (dc+y) 

60 FOR i¡=0 TO ? 

70 LET b=f-2%*INT (f/2): LET f= 
INT_(f/2) , 

75 IF b=0 THEN GO TO YU 
PRINT AT 21, (20-2:x1); "MN: 
NEXT _i 


"¡cs 
20 


231 
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Corriendo este programa obtendremos una impresión de este tipo: 


Pasar de la impresión de un solo carácter a una cadena de caracteres, se limi- 
ta a añadir un bucle más para poder abarcar todos los caracteres de esa cadena: 


5 PAPER 6: INK 1: BORDER 1 
10 INPUT "entre texto A 
as _LET da=PEEK 23606+256%+PEEK 


=1 TO LEN Cc5% 
40 LET dec=da+S* (CODE (CHA5(k TO 
Kk1)-32) 
45 FOR ¡=0_TO 7? 
50 LET fF=PEEK (dc+y) 
j 152 Mr 
=2* INT (f/2): LET f= 


IF b=0 THEN GO TO YQUu 
PRINT AT 21, (20-2*1);" 'E: 


MAS SOBRE LA MEMORIA 


En el mapa de memoria representado en el capítulo “Procesos internos del 
Spectrum” nos encontramos con el “fichero de representación visual” (Display 
file) que va desde la ubicación de memoria con dirección 16384 a la 22527, en 
cada una de estas posiciones de memoria se almacenará, desde que se conecta la 
máquina, una combinación de 8 “ceros”” y “unos”” —un byte— gracias a las 
cuales va a saber el ordenador qué cuadritos están apagados (0) o encendidos 
(1), en la zona controlada por INK y PAPER. 


Como ya dijimos al principio, el ordenador considera dividida la pantalla del 
televisor en una malla de 256 cuadritos horizontales por 176 verticales, los cua- 
les están apagados, inicialmente o, lo que es igual, todas las posiciones de me- 
moria situadas entre 16384 y 22527 estarán ocupadas por 0. 


Pruebe: 


¡To "direccion'a chequear 


20 IF d:16594 OR d>22527? THEN 
0 TO 10 


30 PRINT PEEK d 


Ahora bien, a medida que se van produciendo impresiones en pantalla, el 
ordenador debe ir memorizando diferentes combinaciones de O y 1 en el 
“Display file””. La cuestión, que podría ser de interés según el tipo de aplica- 
ción a desarrollar, sería cómo se produce el almacenamiento y cómo encontrar 
la dirección de memoria de un puntillo determinado de pantalla. 


Empezamos por el “cómo”. 
A cada dirección de memoria del “Display file”” corresponden 8 cuadritos 


de pantalla y sólo esos ocho cuadritos. El criterio de correspondencia es el si- 
guiente: 
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La primera dirección almacenará la situación encendido/apagado (1.0) de los 
ocho primeros cuadritos de la primera fila de la malla de 256 x 176, los cuales 
obviamente corresponden a la primera fila de cuadritos de la malla de 8 x 8 de 
la primera posición de carácter. La siguiente dirección almacenará los ocho 
cuadritos siguientes de la misma fila y así sucesivamente hasta el final de la 
misma. En este momento tendremos 32 direcciones de memoria ocupadas que 
corresponden a las primeras 32 posiciones de carácter de la primera línea de 
caracteres. 


A continuación se almacenan los ocho cuadritos primeros de la novena línea 
de cuadritos de la malla de 256 x 176 que corresponden a la primera fila de 
cuadritos de la malla de 8 x 8 de la primera posición de carácter de la segunda 
línea de caracteres. La siguiente dirección guardará los ocho cuadritos siguien- 
tes de la misma fila (la novena) y así sucesivamente hasta el final de la misma: 


Después, y de la misma forma, los cuadritos de la fila 17 (tercera línea de 
caracteres) y así hasta llegar a la primera línea de cuadritos de la octava línea 
de caracteres. 


En este punto se repite el proceso con todas las segunuas filas hasta llegar a la 
octava línea de posiciones de carácter y así, hasta llegar a la octava fila de cua- 
dritos de la octava línea de posiciones de carácter. 


En este momento el ciclo se repite completo entre la primera fila de cuadri- 
tos de la novena línea de posiciones de carácter y la octava fila de cuadritos 
de la décimo sexta línea de posiciones de carácter. 


Y el ciclo se repite entre la primera fila de cuadritos de la décimo séptima 
línea de posiciones de carácter y la octava fila de cuadritos de la vigésimo cuar- 
ta línea de posiciones de carácter (incluyendo, claro está, las dos líneas reserva- 
das a entrada de datos y emisión de mensajes). 


Para ver gráficamente todo lo anteriormente expuesto, introduzcamos 
en todas las direcciones de memoria del “Display file” una combinación de 
ocho “unos” (11111111); este número binario corresponde al 255 decimal, 
que será el código que usemos para hurgar (POKE) en las direcciones que nos 
interesen; una vez hecho esto procederemos a su impresión: 
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¿255 apagado (0) a encendido (1), todas las 


direcciones del “Display file””. 
i=163984 TO 22527? 
PRINT AT 0,0;PEER i Con estas instrucciones obtendremos los 
PAUSE 50 números decimales, correspondientes a 
PRINT AT 0,0;”" , los binarios representativos de la situa- 
PAUSE 20 ción en que se encuentran cada dirección 
NEXT i del “Display file”. 


FOR d=1638984 TO 22527 | Con estas instrucciones, modificamos de 


Corra este programa. 


Observe los dos ceros que aparecen en segundo y tercer lugar. Si Vd. ha com- 
prendido el párrafo anterior, sabrá a qué son debidos. 


Hasta aquí se ha visto cómo.se produce la memorización del contenido de la 
pantalla. Ahora veremos como, dada una posición en pantalla de un grupo de 8 
cuadritos determinados, localizar su dirección de memoria en el “Display 

“file”. : 


En la terminología aplicada en la explicación previa referente al “cómo”, se 
han utilizado términos tales como “Línea de posiciones de carácter”', para ha- 
cer referencia a la posición vertical de las mallas de 8 x 8 donde los caracteres 
se producen, y “filas de cuadritos” para especificar la situación relativa de los 
cuadritos dentro de las Líneas de Posición de carácter. 


Utilizando estas expresiones diríamos que un grupo de 8 cuadritos está, por 
ejemplo, en la línea de posición de carácter cuarta, y en su tercera posición —de 
izquierda a derecha—, ocupando la séptima fila de cuadritos dentro de esa posi- 
ción de carácter, de tal forma que si nosotros hacemos: 

Línea de posición de carácter = L (varía entre O y 23) 


Carácter de la línea = C (varía entre O y 31) 


Fila de cuadritos = F (varía entre O y 7) 


Cualquier grupo de 8 cuadritos dentro de la pantalla quedará posicionado 
conL,CyF. 
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Para llegar a una fórmula que nos dé la dirección de memoria de cualquiera 
de estos posibles grupos de 8 cuadritos, debemos partir de la primera dirección 
(16384) dedicada al control de pantalla. Después debemos averiguar el número 
de grupos completos de 8 líneas de carácter, que separan a nuestro.grupo de 8 
cuadritos del origen de la pantalla, cuyo valor puede ser uno de estos: 


Caracteres Líneas de Filas 
en una línea posición de carácter 
carácter 
x 8 =0 
El grupo de 8 cuadri- 


tos está entre 
líneas O y 7 


x 8 =2048 


10 
32 XK 11 El grupo de 8 cuadri- 
12 tos está entre líneas 


OVIADIALVN=O0 


13 8y 15 
14 x8 =4096 


19 x8 =6144 Entre líneas 16 y 23 


La última posición po- 
sible es 6143 


Esto, en términos matemáticos y BASIC, es igual a 2048* INT (L/8), siendo 
L lo ya indicado. Una vez que sabemos en cuál de los u¡es sectores horizontales 
de la pantalla está situado el “byte” que nos interesa, deberemos determinar 
cuántas líneas completas (a 32 caracteres cada una) existen entre el comienzo 
del sector en cuestión y la posición de carácter donde se encuentra situado 
nuestro grupo de 8 cuadritos: 


32 * (L - 8* INT (L/8)). 


Ahora determinaremos el número de filas de cuadritos completas (a razón de 
256 cuadritos cada una) que no han llegado a completar una línea de posición 
de carácter: 256*F. Por último, la fila de cuadritos incompleta que viene repre- 
sentada directamente por el valor de C. 
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Recopilando todos estos componentes llegamos a: 


d = 16384 + 2048* INT (L/8) + 32* (L - 8 * INT (L/8)) 


Un modo de comprobar esta fórmula es dar valores a las variables (L, C y F) 
para unos valores conocidos de d. Este sería el caso, p. e., de la primera y última 
posiciones posibles de pantalla, las cuales tienen por direcciones de memoria 
d = 16384 y d = 22527, 


10 INPUT "linea de posicion de 
caracter”? "¡Ll 


¿ 
“caracter en la linea 


"fila de cuadritos”? " 

F 

40 LET d=16354+20438%* INT (L/9)+ 

32% (L1-S%INT (L-59)1)+256%fF+C q 
50 PRINT "Direccion de memoria 


id 
60 0 TO 10 


Pruebe estas dos series: 
1. —L=0,C=0,F=0....... d= 16384 


Z¿=L=23,0=3L.,F=T 2.00. d = 22527 


Volviendo de nuevo al mapa de memoria podemos ver que, entre las direc- 
ciones 22528 y 23295, se encuentra situado el fichero de atributos (Attributes 
file) el cual almacena la información sobre el color (INK .y PAPER), brillo 
(BRIGHT) y parpadeo (FLASH) de cada posición de carácter sobre un total 
de 24 x 32 posiciones de carácter. 


Hay 768 direcciones de memoria disponibles en el “fichero de atributos” y 
un total de 768 posiciones de carácter en pantalla, lo cual implica que los atri- 
butos de cada posición de carácter son guardados y controlados por un solo 
byte o, como ya sabemos, por una combinación de ocho “ceros” y “unos”. 
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Siguiendo el sistema aplicado con el “Display file””, empezaremos por cono- 
cer cómo se produce el almacenamiento y a continuación analizaremos cómo 
encontrar la dirección de memoria de un carácter cualquiera. Más un tercer fac- 
tor. De qué forma un byte controla los cuatro atributos: INK, PAPER, BRIGHT 


y FLASH. 


El primer interrogante tiene una respuesta sencilla. El primer carácter de la 
primera línea de posición de carácter corresponde a la primera dirección del 
fichero de atributos, el segundo carácter de la misma fila a la segunda dirección 
de memoria y así hasta llegar al final —trigésimo segundo carácter— una vez en 
este punto, la siguiente dirección la ocupará, sencillamente, el primer carácter 
de la segunda línea de posiciones de carácter y, así, hasta el final de esta línea. 
El proceso se repite hasta la línea más baja de la pantalla. 


Si mantenemos el significado de L, C y d dado anteriormente veremos que la di- 
rección de memoria que ocupa el byte controlador de los atributos de un carác- 
ter cualquiera viene dado por: 


d = 22528 + 32* L+C 


Fórmula evidente. 


Respecto a la forma en que un solo byte controla los atributos, está en fun- 
ción de las posibilidades que ofrece cada atributo. Así, FLASH requiere un bit 
ya que sólo puede estar activado (0) o desactivado (1), BRIGHT un bit por la 
misma razón. INK y PAPER necesitan tres bits cada uno ya que son ocho los 
colores a controlar por cada comando. Por tanto, y de acuerdo con el manual 
(pág. 219), tendremos: 


Primer bit indica situación de FLASH. 
Segundo bit “indica situación de BRIGHT. 
Tercer bit 

Cuarto bit )----- indica color de PAPER. 


Quinto bit 


Sexto bit 
Séptimo bit )--- indica color de INK., 
Octavo bit 
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Con estos conocimientos podríamos deducir la situación de los atributos a 
través de un PEEK d, pero, gracias a la función ATTR, nos evitamos investigar 
la dirección de memoria —d— correspondiente a un carácter cualquiera situado 
en la línea L y en la posición C de esa línea. Para ello bastará aplicar ATTR 
(L,C) y obtendremos un número decimal comprendido entre O y 255, ya que 
corresponderá a una combinación binaria entre 00000000 y 11111111, 


La rutina que sigue nos dará la situación de los atributos mediante la adecua- 
da transformación del número decimal obtenido por ATTR (L, C): 


INPUT "linea del caracter”? 


"posicion del caracte 
tinea? ";¿Cc 
LET a=ATTR (L,C) 
LET flash=INT (A-128): IF 
THEN PRINT "FLASH DESACTI 


"flash activado" 

60 LET bright=INT ((a-flash+12 
5)/64): IF bright=04 THEN PRINT " 
BRIGHT DESACTIVADO": GO TO $S0 

TO PRINT "bright activado" 

350 LET paper=INT ((a-flashx1285 
-bright:64) 8) 

90 PRINT "paper "¡paper 

100 LET ink=INT (a-flash*1258-br 
ightr6d-paperxi5) 

118 PRINT "INK "¡ink 

120 GO TO 160 


FLASH DESACTIVADO 
BRIGHT DESACTIVADO 
paper 7 

INK Q 


Para comprobar este programa una vez tecleado, introduzca PRINT INK 6; 
AT 10, 10; “=” y, después córralo con un GOTO 10/Enter. 


Pulse STOP y ENTER. Pruebe ahora PRINT INK 3; BRIGHT 1; FLASH 1; 
PAPER 6; AT 10, 10; “=”. Observe las diferencias entre ambos. 
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am | CONSIDERACIONES FINALES SOBRE EL MAPA DE MEMORIA 


Como se puede observar en el mapa de memoria, a continuación del “fichero 
de atributos” viene el control del “buffer”” de la impresora y las variables del 
sistema, que serán explicadas a continuación, y el resto de las zonas de memoria 
que no son objeto de este libro. 


El “buffer”” es como un depósito de donde sale su contenido sólo cuando lle- 
ga al nivel adecuado. En este orden de cosas el buffer de la impresora almacena 
información hasta que ha completado una línea de 32 posiciones de carácter. Es 
to implica que necesita 32 x 8 bytes, que son en efecto, las direcciones disponi- 
bles en esta zona (de 23296 a 23551). 


Las variables del sistema abarcan un conjunto de direcciones de memoria que 
van desde la 23552 a la 23734. Estas variables pueden necesitar uno o dos bytes. 
Como ya sabemos, un byte sólo puede contener números entre O y 255 y dos 
bytes pueden llegar de O a 65535. 


Las variables del sistema, en función de sus respectivos valores mantienen la 
organización del sistema. Conocer estos valores o modificar su contenido puede 
ser muy útil. 


El conjunto de estas variables se puede ver en la página 173 -del manual del 
Spectrum. Conocer un poco más sobre algunas de ellas, servirá de ejemplo para 
profundizar en el estudio del resto. 


Dirección 23560 

Un PEEK sobre esta dirección nos da el código de la última tecla apretada. 
Ejemplo: 

Si Vd. teclea directamente PRINT PEEK 23560 seguido de ENTER, observa- 
rá en el ángulo superior izquierdo cómo aparece el número 13, que es el código 


de la tecla ENTER (pág. 183 del manual), lo cual es lógico ya que esa tecla fue 
la última utilizada. 
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Con el fin de observar cómo una adecuada combinación de las posibilidades 
que ofrece la máquina nos aumenta el campo de alternativas de uso del siste- 
ma, pruebe: 


PRINT CODE INKEY$ 


seguido, claro está, de la tecla imperativa ENTER. 


«Igualmente obtendremos 13. 


Pruebe el siguiente programa y convertirá su ordenador en una rudimentaria 
máquina de escribir: 


10_PARUSE 25: IF INKEY%S="" THEN 
0 TO 10 

20 PRINT CHR% PEEK 25560; 

30 60 TO 10 


Dirección 23561 


Un PEEK sobre esta dirección nos da 35. Pruebe: 
PRINT PEEK 23561 


En la pantalla aparecerá 35, que es el tiempo medido en 1/50 segundo, que 
debe estar apretada una tecla para iniciar su mecanismo de repetición auto- 
mática. 


Pruebe un POKE 23561, 0, seguido de ENTER por supuesto, y comprobará 
como la autorrepetición entra en funcionamiento mucho más tarde. 


Un POKE 23561, 1, hace casi inmanejable el teclado. 


Dirección 23562 
PRINT PEEK 23562 nos dará 5, que es el tiempo medido en 1/50 segundo, 


transcurrido entre dos repeticiones de una tecla en su proceso de autorrepe- 
tición. 
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Si prueba el siguiente programa obtendrá el tiempo, en cincuentavos de se- 
gundos, que mantiene apretada una tecla cualquiera: 


: T b= 
IF INKEYS="" “THEN PRINT AT 
0,0;b: LET a=0: GO TO 7? 
LET a=a+PEER 253562 
TO 6 


Si corre el programa y aprieta una tecla, verá aparecer en el ángulo superior 
izquierdo el número correspondiente al tiempo de la depresión. 


El uso de esta dirección de memoria puede ser útil, entre otras cosas, para ha- 
cer reaccionar un gráfico cualquiera, con más o menos velocidad en función del 
tiempo que hemos mantenido apretada una determinada tecla. 


Dirección 23606 (y 23607) 


Estas direcciones y su utilidad fueron explicadas en el capítulo Más sobre la 
memoria. 


Dirección 23609 


Si tecleamos un PRINT PEEK 23609, ENTER, obtendremos Q que es el 
tiempo que dura el ruido que simula la depresión de una tecla. 


Si hacemos un POKE 23609, 10 queda un “click”” muy audible. 


Dirección 23625 


Si en el transcurso de la ejecución de un programa cualquiera usted teclea: 
PRINT PEEK 23625 
Obtendrá el número de línea de programa donde está situado el cursor. 
Dirección 23677 


Un PRINT PEEK 23677 nos dará la abcisa del último cuadrito (pixel) posi- 
cionado en la pantalla. 
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Dirección 23678 


Un PRINT PEEK 23678 nos dará la ordenada del último cuadrito (pixel) po- 
sicionado en la pantalla. 


Un ejemplo aclaratorio de uso para las dos direcciones anteriores, podría ser: 


10 PLOT 2,7? 
20 DRA 100,75 
30 PRINT PEEK 23677?,PEEK 23678 


Con lo cual obtendríamos una pantalla similar a ésta: 


102 32 


donde el número situado a la izquierda nos da el valor x del pixel donde acaba 
la recta y el número a la derecha nos da el valor de y. 


Si una vez que se ha introducido un programa, se teclea —o introduce a modo 
de instrucción— la siguiente sentencia: 


PRINT ((PEEK 23627 + 256 * PEEK 23628) — (PEEK 23635 +256 *+ PEEK 23636)) 


243 


ES CONSIDERACIONES FINALES SOBRE EL MAPA DE MEMORIA 


Obtendremos el número de “bytes”* que ocupa un programa. 


En el caso de que Vd. desee ampliar la memoria disponible, a costa de perder 
la posibilidad de crear sus propios gráficos, teclee lo que sigue: 


Para un Spectrum 48 K Para un Spectrum 16 k 
POKE 23675, 255 POKE 23675, 255 
POKE 23676, 255 POKE 23676, 255 
CLEAR 65534 CLEAR 32766 


Dirección 23688 


Si Vd. teclea esta instrucción : 


PRINT AT 10, 10; “p”; 


y a continuación: 


PRINT PEEK 23688 


nos aparecerá el número 22, justo a continuación de la letra p, que corresponde 
a la diferencia existente entre 33 y la columna donde debe ser impreso —sobre 
la pantalla— el siguiente carácter. 


Dirección 23689 
Si repetimos: PRINT AT 10, 10; “p”'; 


y ahora tecleamos: 


PRINT PEEK 23689 


obtendremos un 14 a la derecha de p y que representa la diferencia entre 24 
y la línea donde debería ser impreso —sobre la pantalla— el siguiente carácter. 


Estas dos últimas direcciones de memoria nos permiten averigurar dónde se 
producirá la siguiente impresión de pantalla. 
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Dirección 23692 


Con un POKE 23692, 255 desaparece el mensaje de SCROLL? y éste se pro- 
duce automáticamente. 


Pruebe estas líneas: 


10 POKE 23692,255 
20 FOR x=4 TO 100: PRINT "p" 
30 NEXT x 


Para finalizar, en ocasiones puede ser muy importante saber si un programa 
corre sobre un Spectrum 48K, para ello basta con utilizar: 


PRINT PEEK 23732 + 256 * PEEK 23733 


Si el programa corre sobre un Spectrum 48 K en el margen superior izquier- 
do de la pantalla aparecerá el número 65535, 


El mapa de memoria lo podrá estudiar pormenorizadamente en la SECCION V. 
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Apéndice A MANEJO DEL TECLADO 


En el Spectrum, cada vez que apretamos una tecla, algo sucede o se predispone a suceder. 
En este sentido, nuestro mejor colaborador esel CURSOR que queda representado en la pan- 
talla por una letra parpadeante, que, a su vez, nos indica el modo en que el ordenador va a 
trabajar. Estos modos son: 


K L G C E 


Estas letras no han sido elegidas al azar, antes al contrario responden a un criterio claro 
y elemental: son las iniciales de las palabras inglesas que definen las funciones que cumplen. 


Así, la letra K es la inicial de Keyword —o palabra clave correspondiente a cualquiera de 
las instrucciones del BASIC de SINCLAIR— y nos indica que el computador interpretará la 
próxima tecla apretada como la instrucción BASIC que figura sobre la cara de la tecla. 


La letra L es la inicial de letter, previniéndonos el cursor en este modo, que interpreta el 
teclado como si fuera una máquina de escribir. 


Tanto el modo K como el L son mostrados en pantalla automáticamente y su forma de 
funcionamiento es común a todo tipo de Spectrum. 


Los otros modos se estudian a continuación, diferenciando el “plus” del “convencional”. 


La letra G es la inicial de graphics y evidentemente nos indica que el ordenador está pre- 
dispuesto a trabajar en modo gráfico —o, lo que es igual, va a utilizar los caracteres gráficos—. 
Para entrar en este modo, basta con apretar la tecla GRAPH en el “plus” (o CAPS SHIFT y 
la tecla GRAPHICS en el “convencional”) con lo cual el cursor cambia a G. Para salir de 
este modo, se repite el proceso. 


La letra C es la inicial de capitals que significa mayúsculas. Cuando el cursor está en este 
modo nos indica que todas las letras serán consideradas mayúsculas. Para entrar en este modo, 
en el “plus”, sólo necesitamos apretar CAPS LOCK, mientras que en el “convencional” de- 
bemos apretar CAPS SHIFT y CAPS LOCK. Para salir de este modo, repetir el proceso. 


Para conseguir una sola letra en mayúsculas, apretar CAPS SHIFT y la letra deseada. 


Por último, la letra E corresponde a la inicial de extended, refiriéndonos así a todos los 
comandos ampliados de la máquina y, para el “plus”, apretamos exclusivamente EXTEND 
MODE, y, en el “convencional”, CAPS SHIFT y SYMBOL SHIFT. De este modo se sale 
automáticamente cuando se aprieta, a continuación, cualquier tecla. 

Para terminar estas líneas sobre el teclado, vamos a aplicar todos los modos posibles so- 
bre una tecla, la J por ejemplo: 
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S "IVA 
IVA 


El 


1JIHS SAVIO 


Av3ya 


yiIvV 
ysn 


IVWyHOW 
PAE] 


+3S019 
NVAI 
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Asumimos que al comenzar este ejercicio, estamos en modo K y, consiguientemente, al 
apretar la tecla J nos aparecerá en pantalla la palabra LOAD y, a la vez, el cursor cambia al 
modo L, con lo cual, al apretar nuevamente la tecla en cuestión, obtendremos la letra J en 
minúsculas. Si en estas condiciones se aprieta CAPS LOCK (o CAPS SHIFT y CAPS LOCK 
en el “convencional”) el cursor pasa a modo C, para indicarnos que, si apretamos otra vez la 
J, la obtendremos en mayúsculas. Para salir del modo C, retornando al L, repetimos el pro- 
ceso. 


También podemos obtener la J mayúscula apretando simultáneamente esta tecla y CAPS 
SHIFT. 


En el “plus”, todos los símbolos que están inmediatamente encima, o encima y a la dere- 
cha, del símbolo principal que figura en la tecla, se obtienen apretando dicha tecla y SYMBOL 
SHIFT. En el caso del “convencional” este símbolo figura en rojo en la superficie de la tecla. 
Pruebe con SYMBOL SHIFT y J. 


Para acceder a los símbolos y comandos situados fuera de la tecla propiamente dicha, de- 
bemos pasar al modo E, lo cual implica, volviendo a nuestro ejemplo, apretar EXTEND MODE 
en el “plus” o CAPS SHIFT y SYMBOL SHIFT en el “convencional” y ya, con el cursor en 
modo E, obtendremos VAL con solo apretar la J y VALS si apretamos simultáneamente la 
J y SYMBOL SHIFT. 


El modo G sólo es utilizable cuando se aprieten teclas con algún carácter gráfico predefi- 
nido. Pruebe apretando GRAPH (o CAPS SHIFT y GRAPHICS en el “convencional”); cuan- 
do el cursor se transforme en la G parpadeante, apriete la letra 6, por ejemplo, con lo que 
aparecerá en la pantalla el símbolo gráfico que figura en la superficie de la tecla 6. 


CROQUIS DE ACCESO RAPIDO A LOS COMANDOS DEL TECLADO 


En la página siguiente ofrecemos un cuadro en el que por orden alfabético pueden 
localizarse los distintos comandos del Spectrum, tanto en su versión normal como en la 
versión Plus. 
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Croquis de acceso rápido a los comandos del teclado 


En 


E fa Fo En E Eo E a 
cn a E El ajaja eblolooc——ololiok 


Un caracter + CS significa apretar simultáneamen- 
paño ll li ie jidd Ú e Eo dió pee apretar simultáneamen 
E significa modo E del cursor. n caracter E 
y te esa letra y SYMBOL SHIFT. 


Comandos Número Controlado En Comandos Número Controlado 
por orden de por la(s) modo por orden de por la(s) 
alfabético referencia tecla(s) alfabético referencia tecla(s) 


28 K 

34 

31 

27 
LPRINT 33 
MERGE 15 
MOVE 6 
NEW 21 
NEXT 36 
NOT 22 
OPEN ++ 4 
OR 17 
OUT 19 
OVER 36 
PAPER 33 
PAUSE 37 
PEEK 19 
Pl 37 
PLOT 11 
POINT 8 
POKE 19 
PRINT 10 
RAND 15 
READ 21 
REM 13 
RESTORE 22 
RETURN 16 
RND 15 
RUN 14 
SAVE 22 
SCREENS 28 
SGN 24 
SIN 11 
SOR 26 
STEP 23 
STOP 21 
STR 16 
TAB 10 
TAN 13 
THEN 25 
TO 24 
USR 29 
VAL 22 
VALS 27 
VERIFY 14 


modo 


ABS 26 G 
ACS 12 W+SS 
AND 16 Y+SS 
ASN 11 0+SS 
AT 18 1+ SS 
ATN 13 E+SS 
ATTR 29 L+SS 
BEEP 31 Z+SS 
BIN 35 B 
BORDER 35 B 
BRIGHT 35 B+SS 
CAT 9 9+5SS 
CHR$ 17 U 
CIRCLE 26 H+SS 
CLEAR 32 

CLOSE + 5 5+SS 
CLS 34 
CODE 18 
CONT 33 
COPY 31 
COS 12 
DATA 23, 
DEF FN 1 
DELETE 17) 
DIM 23 
DRAW 12 
EDIT 1 
ERASE 7 
EXP 32 
FLAGH 34 
FN 2 
FOR 24 
FORMAT 17) 
GOSUB 26 
GOTO 25 
IF 17 
IN 18 
INK 32 
INKEYS 36 
INPUT 18 
INT 14 
INVERSE 37 
LEN 28 
LET 29 
LINE 3 


9) 


30L¿DIENO=< 
nu 


PS 


1%) 


Y) 
++ + + 
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Apéndice B DIAGRAMAS DE FLUJO 


Programar es una actividad lógica que requiere claridad y precisión en todas sus etapas. 
De entre ellas, la más importante es la que se refiere al planteamiento del propio programa. 


Definir los objetivos a lograr y hacerlo de forma certera ahorra esfuerzos inútiles. Para 
ello, debe plantearse la siguiente pregunta: 


¿Que se pretende conseguir con el programa? 


La respuesta a esta cuestión no siempre es fácil y, a mayor complejidad, necesitará más 
tiempo de reflexión. 


Una vez superada esta fase, aparece indefectiblemente otro interrogante: 
¿Cómo organizar el programa? 


. y . 
Es claro que una forma de organizar un programa consiste en sentarse ante el compu- 
tador y comenzar a teclear de manera que, finalmente, el listado obligue a la máquina a dar 
una respuesta, aunque no se haya dado una estructura lógica al trabajo. 


En este APENDICE, vamos a tratar los diagramas de flujo u organigramas, gracias a los 
cuales se obtiene un boceto, a grandes rasgos, de lo que será el programa. 


La mayor ventaja que se deriva de la realización de los diagramas de flujo es el esfuer- 
zo de síntesis al que se somete el programador, con la consiguiente claridad de ideas que 
de esto se deriva. 


Un diagrama de flujo consiste, en definitiva, en una serie de símbolos estándar, unidos 
por flechas para indicar los caminos que la secuencia del programa puede tomar. 


Cada símbolo estándar implica, por su forma, una determinada actividad, pudiéndose 
escribir dentro de ellos todo lo que sirva para darlos mayor claridad. 


Los símbolos estándar generalmente utilizados en los diagramas de flujo son: 


Con el rectángulo se expresa la idea de acción, que será ileva- 
da a cabo por un comando BASIC. 


Con el rombo se exige la toma de decisión entre dos posibili- 
dades. 


Con este paralelogramo se indica que entran datos en el com- 
putador o salen de él. 


Con el círculo se conectan las partes del programa que no lo 
están por medio de flechas, para lo que basta escribir en su 
interior la referencia oportuna. 


Con esta figura compuesta se representan el principio y el fi- 
nal de determinadas secuencias, ya sean programas completos 
o subrutinas. 


y ROL 
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Antes de pasar a unos ejemplos que clarifiquen lo expuesto hasta aquí, quisiéramos ha- 
cer hincapié en que los organigramas no son consecuencia de los programas, sino que la es- 
tructura de cada programa es una consecuencia del organigrama correspondiente. 


Los diagramas que figuran a continuación deberán ser hechos a mano por el programa- 
dor a fin de sacar al lector de cualquier rigor academicista. 


Los diagramas y sus símbolos están pensados para ser usados libremente por el progra- 
mador de tal forma que se conviertan en un buen útil de trabajo que pueda manejarse sin 
ninguna rectricción. 


Dicho esto, pasemos a analizar algunos problemas elementales susceptibles de ser con- 
vertidos en programas. 


1. Desarrollar un programa que permita sumar dos números introducidos por teclado, 
en una secuencia ininterrumpida, y se impriman los resultados en pantalla. 


DIAGRAMA: PROGRAMA: 
5 REM Sumar dos números cualesquiera 


Entra un 
número por 
teclado 


19 INPUT A 


Entra otro 
número por 
teclado 


2() INPUT B 


Se suman 
los dos números 
anteriores 


30 LETC=A+B 


Imprimir 
el resultado 
en pantalla 


4() PRINT C 


5 INPUT “Otra suma?”; S$ 


60 IF SS = “S” THEN GO TO 10 


70 STOP 
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2. Desarrollar un programa que, al ejecutarlo, permita introducir dos números por te- 
clado y si su suma es mayor que diez, esta se divida por dos; en otro caso, que se 
multiplique por 3. 


DIAGRAMA: 


PRINCIPIO 


Entran los 
dos números 
por teclado 


Variables 
asociadas 
AyB 


Sumar 


C=A>+B 
los números 


Dividir la 
suma 
por 2 


Multiplicar la suma 
por 3 
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3. Diagrama para una decisión sencilla: 


PRINCIPIO 


Entrada 
por teclado 
de un dato 


decisión efectuar 
condición una acción 


4. Diagrama para más de una decisión y bucle: 


PRINCIPIO 


Entrada 


qe una 
condición acción 
Sl se 
cumple 


NO se 


a 
2 sz otra 
condición 


acción 


ACCION 
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EJEMPLO: 


S. Diagrama para un bucle indefinido hasta que no se cumpla una condición: 


PRINCIPIO 
ACCION 


NO se 
cumple 


A medida que los conocimientos de BASIC del programador aumentan, su capacidad 
para resolver problemas se hace paulatinamente mayor y, en consecuencia, los diagramas 
tendrán que plantearse desde perspectivas que abarquen mayores generalidades del problema 
a resolver, del cual se sacarán, a su vez, unos diagramas más precisos. 
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6. Posible diagrama para un programa de pruebas objetivas: 


PRINCIPIO 


Fijar Estudio de variables 
variables para colaboradores 


Entrada de 
valores por 
teclado 


Banco de grá- 
ficos: movimiento 


Procesos de 
¡0 control y seguridad | ( Rutinas estadísticas 
chequeo de las 
subrutinas 
E Rutinas de 
verificación 
Procesos 


derivados de Subrutinas de tiem- 
las subrutinas pos y presentación Perea 


PROGRAMA AUXILIAR 


para introducción 
de DATAS a eliminar 
posteriormente 


Todos estos bloques son en sí mismos un programa diferente cada uno, por lo que algu- 
nos de ellos los van a realizar los programadores cuyos nombres figuran anejos a los mismos, 
con el fin de hacer más fácil la tarea. 


Cada uno de estos colaboradores debe presentar su propio diagrama al coordinador del 
proyecto para poder estudiar conjuntamente los problemas que se presentan y las incompa- 
tibilidades que puedan surgir. Esta suele ser la forma de trabajar en programas complejos. 
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Apéndice C FUNCIONES LOGICAS APLICADAS 


Su aplicación a la intrucción IF/THEN 


Al hablar sobre los operadores de relación, dijimos que estos sólo actúan sobre dos ope- 
randos cuyo resultado únicamente puede ser cierto o falso. Por ejemplo, en A>B sólo hay 
dos posibilidades esperadas: A es mayor que Bo no lo es. 


Los operadores lógicos actúan entre operandos conformados por operadores de relación, 
lo cual implica que los operadores lógicos sólo actúan entre dos posibilidades: cierto y falso. 


En este Apéndice vamos a estudiar la aplicación de los operadores lógicos AND, OR y 
NOT en combinación con la instrucción IF/THEN. 


Analicemos desde un punto de vista estrictamente lógico la siguiente expresión: 


IF (A = 15) AND (B > 100) THEN PRINT “bien” 


Las posibilidades que se nos ofrecen son que A sea o no igual a 15 y que B sea o no ma- 
yor que 100. En función de ambas alternativas, escribiremos o no la palabra “bien”. 


En el ejemplo tenemos dos operadores de relación, “=” y “>”, y el resultado de aplicarlos 
como sabemos entre dos operandos, sólo puede ser cierto o falso. Asociemos cierto con el 
símbolo 1 y falso con el Q. 


De aquí deducimos que, las combinaciones posibles de 1 y Q que nos ofrecen ambas 
operaciones de relación son: 


A =B > cierto > 1 

otra posibilidad > falso = () 

B> 100 > cierto > 1 

otra posibilidad > falso > Q NOTA: El símbolo > significa “implica”. 
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Volviendo a la expresión inicial, escribiremos las posibilidades de que la palabra “bien” 
sea escrita: 


Si A=B (cierto ó 1) Y B> 100 (cierto ó 1) entonces sí se escribe 


Si (falso ó 0) Y (falso ó Q) entonces no se escribe 
Si (falso ó QM) Y (cierto ó 1) entonces no se escribe 
Si (cierto Ó 1) Y (falso ó (0) entonces no se escribe 


Es decir que el operador lógico y exige que los dos operadores Sobre los que actúa sean 
1 —cierto— para permitir que suceda la acción que le sigue. 


Para concluir, hagamos igual a x el resultado (Pó 1) de la primera operación de relación 
(A = 15, en el ejemplo) e igual a y el resultado (Y ó 1) de la segunda operación de relación 
(B > 100, en el ejemplo); pudiendo presentar las posibilidades que ofrece el operador lógi- 
co Y (AND, en inglés) mediante la siguiente 


TABLA DE LA VERDAD: AND 


Se permite la acción subsecuente 


Se prohíbe la acción subsecuente 


Se prohibe la acción subsecuente 
Se prohíbe la acción subsecuente 


En lo sucesivo nos referiremos directamente a la tabla de la verdad de cada operador lógi- 
co, evitando la explicación que nos lleva a ella. 


Para comenzar los estudios de Bachillerato es necesario tener 14 años y haber obtenido 
una calificación mínima de 5 puntos en la E.G. Estudie este programa y ejecútelo. 


PROGRAMA 


1 INPUT “Algún alumno?”; AS 
20 IF AS= ”sí” THEN GO SUB 6 
30 IF AS= “no” THEN STOP 
4 RETURN 
5 CLS 
60 INPUT “Nombre del alumno?; NS: PRINT NS 
79 INPUT “Edad?”; E: PRINT E 
8 INPUT “Calificación?”; C: PRINT C 
9 IF (E>14) AND (C<5) THEN GO TO 140, 
100 PRINT “Admitido” 
110 PRINT 
120 INPUT “Otro alumno?”; AS 
13 GOTO 24 
140 PRINT “Rechazado”: GO TO 110 
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O lógico 


Este operador lógico permite la acción subsecuente siempre que uno cualquiera de los 
operadores de relación sea 1 (cierto). 


Volviendo al ejemplo del operador anterior, pero cambiando éste por el actual (OR), 
tendremos en términos de BASIC: 


IF (A = 15) OR (B> 100) THEN PRINT “bien” 


Según la siguiente 


TABLA DE LA VERDAD: OR 


COMENTARIOS 
Se permite la acción subsecuente 


No se permite la acción subsecuente 
Se permite la acción subsecuente 
Se permite la acción subsecuente 


Podemos deducir que la palabra “bien” será impresa en pantalla en el caso de que A 
sea igual a 15 O B sea mayor que 100. 


EJEMPLO: 


¿Recuerda el programa de Miss Universo? Compárelo con éste, en el que se ha introdu- 
cido OR. Ejecútelo y observe los resultados. 


PROGRAMA 


10 INPUT “Alguna candidata:”; OS 
2 IF OS = “sí” THEN GO SUB 60 
3) IF OS = “no” THEN STOP 
4 RETURN 
5 CLS 
60 INPUT “Nombre?”; NS: PRINT N$ 
70 INPUT “Talla”; T: PRINT T 
80 INPUT “Peso?”: P: PRINT P 
9) IF (T< 1.7) OR (P > 60) THEN GO TO 140 
100 PRINT “Admitida” 
110 PRINT 
120 INPUT “Otra candidata?”; OS 
130 GOTO 20 
14 PRINT “Rechazada”: GO TO 110 
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Este es el más sencillo de los operadores lógicos, ya que el resultado es falso ( f ) cuando 
el operador de relación es cierto ( 1 ), y cierto ( 1 ) cuando el operador de relación es falso 


(Q ), según la siguiente 


TABLA DE LA VERDAD: NOT 


No se permite la acción subsecuente 
Sí se permite la acción subsecuente 


IF NOT (A =B) THEN PRINT “bien” 


Esto implica que la palabra ““bien”” será impresa en pantalla sólo en el caso de que A no 
sea igual a B. 
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Apéndice D TROCEADO DE CADENAS 


Por cadena, y en términos de programación, entendemos cualquier concatenación de ca- 
racteres. 

Entre otras cosas, hay que tener en cuenta que una cadena sólo se puede igualar a una 
variable de caracteres. Tal sería el caso de 


A$ = “ROMARBELLAVE, es una ?> 1” 


En este ejemplo la cadena está compuesta por letras mayúsculas y minúsculas, dos signos 
de putuación, un espacio y un par de símbolos matemáticos. En definitiva, caracteres en ge- 
neral. 


Trocear una cadena significa subdividirla en cadenas menores. Á este tema dedicaremos 
el Apéndice presente. 


Sobre la variable AS fijada más arriba, aplicaremos los comandos oportunos. 
Este sistema lo seguiremos con todas las instrucciones de este apéndice. 


Entendemos que, como introducción a esta materia, son suficientes los COMENTARIOS 
para hacerse idea de la aplicación de cada comando. 


Posibilidad 1 


Extraer, de la cadena representada por A$, una subcadena con los cuatro caracteres situa- 
dos más a la izquierda. 


Ejemplo COMENTARIOS 

5 LETBS= AS (1 TO 4) La ejecución de estas dos líneas de programa obliga- 
6 PRINT BS rá la impresión en pantalla de la cadena ROMA. 
Posibilidad 2 


Extraer una subcadena de AS con los cinco caracteres situados más a la derecha. 


Ejemplo COMENTARIOS 
50 LETBS=AS(29TO 24) “La ejecución de esta dos líneas nos dará en pan- 
60 PRINT BS talla: EA 

7 


Fíjese el lector que el primer carácter de esta subca- 
dena es un espacio. 
Idéntico resultado. 
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Posibilidad 3 


Extraer una subcadena de A$ que comience en su tercer carácter y tenga una longitud 
de 8 caracteres. 


Ejemplo COMENTARIOS 

50 LET BS = AS (3 TO 10) Al ejecutar estas líneas obtendremos: - 
60 PRINT BS MARBELLA 

Posibilidad 4 


Extraer un solo carácter de la cadena AS. 


Ejemplo COMENTARIOS 
50 LET BS = AS (6 TO 6) En pantalla aparecerá B. 
60 PRINT BS 


Todo lo visto más arriba y algunas otras formas de aplicar el comando TO con idéntico 
resultado, lo podemos ver en el siguiente ejemplo: 


Programa Comentarios 


10 LET A$= “ROMARBELLAVE”” La variable A$ es valorada. 


20 PRINT AS (TO 4) Imprimo todos los caracteres desde el principio 
hasta el cuarto, de la AS. 

30 PRINT AS (3 TO 10) Imprimo todos los caracteres desde el tercero 
al décimo, ambos inclusive, de la A$. 

40 PRINT AS (8 TO) Imprimo todos los caracteres del octavo al final 
de la A$. 

50 PRINT AS (6 TO 6) Imprimo el sexto caracter únicamente. 


60 PRINT AS (1 TO 12) Imprimo la cadena del principio al final. Igual 
resultado obtendrías con PRINT AS. 


70LETBS= AS (6 TO 10) Dejamos la variable B$ igual a la subcadena A$ 
indicada. 
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